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1. ABSTRACT 

THIS PROGRAM IS DESIGNED TO SEQUENT I Al L l TEST All 

CONTROL LOGIC FUNCTIONAL ^ OF THE TM03. 

EACH TEST WILL ATTEMPT TO ISOLATE FAILURES 

TO THE MODULE LEVEL AND PROVIDE PRINTOUT INFORMATION 

WHICH WILL IDENTIFY THE FAILING MODULE. 

THE CONTROL LOGIC TESTS TEST ALL ERROR AND STATUS CONDITIONS AS WELL AS 

ADDRESSING PROTOCOL AND OPERATIONAL LOGIC SEdUtNCtS. 

THE LEVEL OF FAULT ISOLATION IS POSSIBLE BECAUSE U> 

TM03 THE STRUCTURE AND ITS MAINTAINENCE MODES. 

REQUIREMENTS (HARDWARE) 



SEQ COO 7 , 



A. ANY PDP-Ll PROCESSOR 

B. 8K Of CORE 

C. CONSOLE TTt 

D. TM05 MAGTAPE CONTROLLER 

E. MASSBUS CONTROLLER iRH) 

F. TE16 MAGTAPE TRANSPORT 



LOADING PROCEDURE 



USE STANDARD PROCEDURE FOR LOADING BINARY PAPER TAPJ , 
4. STARTING PROCEDURE 



■ HERS ARE TWO (?) STARTING ADDRtSStS THAT MA t M USE : 
*>00(8) AND ?10(M. 

A, ?00(8): STARTING AT THIS ADDRESS Will CA'JM A PROi.HAM 

IDENTIFICATION HEADER TO BE PRINTED Rl POHI U "UNo 
IS BEGUN. 

H. ?10(8): STARTING AT 'HIS ADDRESS Will NOT PRINT !Hf 

IDENTIf ICATION Hr.ADER AND Is IH^fUIH! Gl NJ RAl I i 
TO BE USED EOF nf STARTS RATHER THAN INITIAi MART 

♦• NOTf SM. ALSO 'ifCHON *> CONSln I ,WHCH SETTINGS 
*• TiPf tc TO RESTAH1 PROGRAM \ y?00 i 
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4.1 AUTOMATIC MODE OPERATION 

If THIS PROGRAM IS LOADED L RUN UNDER AUTOMATIC (CHAIN) MODE.S 

DHAIU RESPONSES TO OPERATOR REQUESTS ARE UStD. AND THfc SOFTWARE 

SWR INVOKED WITH A SWITCH SLUING OF OOOOOO . NO 

OPERATOR INTERVENTION IS REQUIRED. IN ORDER TO St T THL SWR 10 

A DIFFERENT SETTING, CHANGE L0C:176(SWREG) TO THE DESIRFD SETTING. 

"EXCEPTION: U THIS PROGRAM IS I OADt D VIA TMDP CHAIN MODI 1 HE 

PROGRAM WILL NOT TEST TM03 DRIVE* UO, TE16 SLAVE 90. 

♦♦NOTE -THIS PROGRAM CONTAINS OPERATOR INTERVENTION TESTS. TO RUN 
THESE TESTS THE PROGRAM MUST BE LOADED IN 'DUMP' MODE 
AND SW09 SET TO 1. 

4,<? SAMPLE START AT u'00 



♦♦NOTE? DEFAULT RESPONSES ARE SHOUN IN ANGLE BRACK MS <>, 
OPERATOR RESONSES ARE SHOWN IN PARENTHESES ( ), AND 
MEMORt LOCATIONS CONTAINING THE DEFALK T ARf SHOWN IN 
SQUARE BRACKETS ( ]. 

IN THIS EXAMPLE THE OPERATOR HAS CHOSEN DEFAULT RESPONSt S 
TO INVOKE THE. DEFAULT TYPE (CR). 

♦ ♦ NON STANDARD JLMPE.R MODE 

M89M (W? IN) ,M8<*3' (ti? IN.Wi OUT) ♦♦ 

PARAMETER REQUEST; ^DEFAULT* (RESONSE) HOCATION:] 

TM0i-TEl6 CONTROL I OGIC TEST PART I (D/TF.A B) 
♦ ♦♦ASSURE TAPE IS AT BCU*** 
TlPE »C 10 RESTART 

REGISTER START; <17?440* ( CR ) [RK.S:J 

VECTOR ADDRESS: <224> ( CR ) ( VK T : ] 

IS CONTROLLER JUMPERED IN NON- STANDARD MODE 

UPE J FOR NON S T ANDARD OR CR FOR STANDARD <*» (JUMPER: J 

TM0 3 DRIVE; <0> CCR) IDRvM;) 

Mlh SLAVE: <0> (CR) [si VN: ] 

STATIC TESTS ONLT: <0> CCR) [S T ATC:1 

SI AVE TtPE (O'Tt.lf.. 1 *Tn/71: <0» i C« ^ | .. ,-r.i'.; 

V THt SOMWARf SWR IS INVOKED: 
SWR - <QOGOOO> NEW = (CR) ISWREG:] 



I- V 
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LOGIC TEST 023} FORMAT ERROR (FMT) 



PROGRAMMED SEQUENCE: AN ILLEGAL FORMAT CODE IS LOADED INTO 

THE TAPE CONTROL REGISTER, UIAM3 IS LOADED INTO THE MR 

READ COMMAND AND THE GO BIT IS SET, THE ERROR 

REGISTER IS CHECKED FOR FORMAT ERROR AND UNEXPECTED ERROR 

BITS. THIS SEQUENCE IS REPEATED FOR ALL ILLEGAL FORMAT CODES 

LIKELY FAULT LOCATIONS! M8905-YB ,M8906 ,M8909 
CIRCUIT PRINT REFERENCE 



FORMAT LITS MR6 

ll> DECODE BF'3 

ILF FLOP MBI11 

Il.F MULTIPLEXERS MBI10 

LOGIC TEST 424: DATA BUS PARITY ERROR (DPAR) 



PROGRAMMED SEQUENCE: SET UP A WRAP 2 AS FOLLOWS: 

NORMAL FORMAT > TAPE CONTROL REGISTER, -10 - -» WORD 

COUNT, 20 > FRAME COUNT, WAM2 - > MAINTENANCE RE 

GISTER,. LOAD WRITE COMMAND AND GO BIT. SET PAT BIT IN 
CS2. AFTER A DELAY MR IS LOADED 4 TIMES CAUSING 2 DATA 
BUS TRANSFERS. DPAR AND CPAR ARE CHECKED, THEN A CHECK 
FOR UNEXPECTED ERRORS IS MADE MASKING OPI. 

LIKELY FAULT LOCATIONS: OBUS LINES, M8905-YB. M89Q6 

CIRCUIT PRINT REFERENCE 



MM CLK MRS 

WRT CLK GENERATION TCCM4 

DPAR f I OP MHIU 

DATA BUS PARITY TREE QK3 



G." 1 
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LOGIC TEST ,725: NON- -EXECUTABLE FUNCTION (NED 

PROGRAMMED SEQUENCE: LOAD FC WITH i. SET WAM 2. SET 
WRITE AND GO. ILF SHOULD SE ! DUE TO TOO SMALL INITIAL 
FRAME COUNT. CHFCK ILF, CHECK FOR UNEXPECTED ERRORS. 

LIKELY FAULT LOCATION: M8909 

CIRCUIT PRINT REFERENCE 



NEF F-LOP MBI11 

NEF MULTIPLEXER MBI10 

SET NEF MB 1 7 

LOGIC TEST #26: FRAME COUNT ERROR 



PROGRAMMED SEQUENCE; SET WC TO -10, FC TO -20 WAM3 IN 



MAINTENANCE REGISTER, LOAD WRITE AND GO, DELAY ISSUE MM OR 

CLEAR, CHECK FCE AND CHECK FOR UNEXPECTED ERRORS. FRAME 
COUNT ERROR SHOULD BE SET BECAUSE A WRITE OPERATION WAS 
TERMINATED PRIOR TO A WORD COUNT OVERFLOW. 

LIKELY FAULT LOCATIONS: M8909, MB CABLE, M8933, M89Q5-YB 
CIRCUITS PRINT REFERENCE 



RUN LINE MB1 

EBL. PLS MB IS 

FCF FLOP MBlll 

SHUTDOWN LOGIC TCCM5 

MAINT, FUNCTION DECODE MRS 



U > 
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LOGIC TEST #?7: Il.lF.GAL REGISTER 



SfcU 00^0 



PROGRAMMED SEQUENCE; If THE RH HAS All MASSbUS REGISTER 
OPEN (MOST SYSTEM IN THE FIELD DON'TI, ALL THE ILLEGAL 
REGISTER ADDRESSES ARE READ, CHECKING THE ILR BIT AFTER 
EACH ATTEMPT. 

LIKELY FAULT LOCATIONS: MASSBUSS, M8909 



CIRCUITS 



PRINT REFERENCE 



REGISTER SELECT LINES 
REGISTFR SELECT DECODE 
ILR FLOP 



MB1, MB2 

MBI? 

MBIU 



LOGIC TEST »30: DRIVE TIMING ERROR 



PROGRAMMED SEQUENCE: 



THE MAINTENANCE REGISTER IS LOADED UITH A FUNCTION THAT 
IS DESIGNED TO CRIPPLE OCCUPIED. FRAME COUNT REGISTER IS 
CLEAREO TO SET FCS LOAD WRITE COMMAND AND GO BIT. CHECK 
FOR DTE. THEN DRIVE IS INITIALIZED. FCS IS SET AND URP 
3 CODE IS LOADED INTO MR. WRITE COMMAND AND GO BIT ARE 
SET. AFTER DELAY FOR ACCELERATION, THE MR CLOCK IS GENERATED 
AND ANOTHER CHECK IS MADE FOR DTE. FINAL CHECK IS MADE 
FOR ERRORS OTHER THAN OPI. THE FIRST MAINTENANCE REGISTER 
CODE WHICH CRIPPLES THE OCCUPIED RECEIVER CAUSES OCCUPIED 
TO BE ASSERTED AND 1ESTS THE CIRCUITRY WHICH CHECKS FOR 
OCCUPIED WHEN A DATA TRANSFER COMMAND IS INITIATED. 1H[ 
SECOND TEST UTILIZES THE FACT THAT THE WRP 3 CODE INHIBUS 
THE MASSBUS UCLK RECEIVER CREATING A SITUATION WHERE SCI K 



IS NOT FOLLOWED BY A WRITE CLOCK. 



1 IKF.L.Y FAULT 



M8909, M8905 YB, M8<>06 , MB CABLES 



CIRCUITS 



DTE FLOP 

CRIPPLE OCCUPIED FUNCTION 

WRP 5 FUNCTION 

PREVIOUS OCCUPIED CHECK 

CHECK FOR WCLK 

MM CLK 



PRINT REFERENCES 



MB L 1 1 
MRS 

MRS 
MB I / 

m > 

MRU 
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LOGIC TEST 51 j OPERATION INCOMPLETE (OPI) 

PROGRAMMED SEQUENCE: 



SET UP INCLUDES FORMAT, WRP 2 (BIT FIDDLER WRITE), FCS. 
WRITE COMMAND AND GO BIT ARE SET AND THE PROGRAM DELAYS 

FOR OPI. <A SECOND ft ST INVOLVES SETTING UP URP 5 AND 

ISSUING A READ COMMAND. ESSENTIALLY THIS TEST UTIt I/ES 

THE WRAPAROUND CODES TO PREVENT ANY RECORDS BEING DETECTED 

AFTER A READ OR A WRITE COMMAND IS ISSUED, 

I IKEl.t FAULT LOCATIONS: M8933, M8909 

CIRCUITS PRINT REFERENCES 



OPI TIMER TCCMS 

OPI FLOP MB III 

OPI TIMER CONTROL MB 17 



LOGIC TEST 3?.; UNSAFE CUN5) 

PROGRAMMED SEQUENCE: 



A NON-EXISTANT SLAVE IS SELECTED AND A RF AD COMMAND IS ISSUi D . 
UNSAFE ERROR IS CHECKED, IF THE DRIVE TiPE REG INDICATES A IU77 
THEN NON -EXECUTABLE FUNCTION (NEF) IS ALSO CHECKED. 

LIKELY FAULT LOCATIONS: M69Q9, M8910. SLAVE CABl \ 
CIRCUITS PRINT REFERENCED 



UNSAFE I LOP MB I 11 

SI T UNSAFE MB I / 

MUL GENERATION LAWO 



J, 1 
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I OGIC TEST 33: POSITIONING IN PROGRESS (PIP) 
PROGRAMMED SEQUENCE : 



SHT UP DRIVt AND SLAVE ARE SELECTED. ECS IS SET. A SPACE 

COMMAND IS ISSUED AND PIP IS CHECKED. 

LIKELY FAULT LOCATIONS: M8909, M8933 

CIRCUITS PRINT RFEE'RENCES 



SPACE FUNCTION DECODE MB 1 5 

PIP GENERATION TCCM7 

STATUS REGISTER TCCM7 



LOGIC TEST 34 j PHASE -ENCODED STATUS (PES) 
PROGRAMMED SEQUENCE: 

DENS Hi CODES - 4 ARE. LOADFO AND PES IS CHECKFD FOR FACH 

CODE. IT IS EXPECTED ONLY * OR DENSITr 4. 

LIKELY FAULT LOCATIONS: M8905-YB. SLAVE BUS. M8431. MB953 
CIRCUITS PRINT REFERENCES 



OFNSITt BITS MRt, 

DENSITt LINES SBC 

PES CIRCUIT i;C3 

PES STATUS BIT TCCM7 



SfcG 0022 



K! 
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ONES AND /EROS, 

PROGRAMMED SEQUENCE : WRITF TC REGISTER AND CHICK CPAR, READ EC AND 
CHfCK MCPE, UPDATE DATA, REPEAT, DATA IS ALL O'S, WALKING '1' BIT, 
AU 'O'S. ? WALKING *1' BITS BEGINNING WITH BIT AND 8 
DATA IS CHECKED Al ONG WITH ERROR HITS. 

i-lKFl.r FAULT LOCATIONS: M5904 ,CAQl ES,M5905YA,M8909, M890S- YB ,M8933 



r.t- 



EQ 0010 



CIRCUITS 



PR1N T REFERENCE 



C ; INKS 

C BUS MU TIPLEXERS 

ERROR BIT 

MCPt BIT 

LOGIC TEST 04: SLAVE ADDRESSING 



(MB1.»?.5) 

(MHI3.4,b,8K TCCM7)CMR) 

(MBIU ) 

(PACA) 



PURPOSE: VERIFY ,HE FUNCTIONING OF THE SLAVE ADDRFSS B 
THE TAPF CONTROL REGISTER THE SLAVE ADDRESS BUS LINES, 
THE ADDRESS DECODE CIRCUIT IN THE TF16 ANO THF SPR BIT 

• IT IS REQUIRED THAT ONE* ONE SI AVE BE LOWERED UP WHEN* 
•THIS TFST IS Rbtt. * 

************4****.***************************±********. + * 



S IN 



PROGRAMMED SEQUENCE: THL SLAVE ADDRESS BITS IN THt TAP* 
CONTROL REGISTER ARE LOADED WITH ALL 8 COMB I NA1 TONS AND 
SPR IS CHECKED FOR i ; ACH ADDRESS. 

I IKEl.r FAUl TS LOCATIONS: M89Q5-YB .M8957.CABLE.M9001 .M89io,M90Ol!A,M39i5 



CIRCUITS 



PRINT REFERENCE 



REGISTER SELECT 

si Avt ADDRESS HI ? S 

SI AVE ADDRESS I. INI S 
TE16 ADDRESS DECODE 
SPR BIT 



CMBIt') 

CMRh) 

(M893/, t » .'),(i Aw* i 
( i.AUfc ) 
(LAWb)(H900itA3( XQQHn 
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CROSS REFERENCE TABLE -- USER SYMBOLS 



SEQ 0137 



I.T4A 

L.T4B 

I.T4C 

I.T4D 

I.T4CRG 

l.T4l:Rl 

LT4ER2 

I.T4G 

LT4G0 

I.T4X 

LT40 

LT40IT 

LT40X 

LT40XX 

L.T41 

LT41IT 

LT41X 

L.T42 

I T4PA 

LT42B 

LT42B1 

L.T42B2 

LT42C 

LT42D 

LT42E 

LT42IT 

LT42X 

t T43 

LT43C 

L.T4 3L) 

I. f43E 

LI43K 

I.T43TT 

i~T4 3X 

IT4 3XX 

LT44 

I T44A 

I.T44A1 

I.T44B 

I.T44C 

L.744D 

I.T44E 

L.T44F 

I T44IT 

LT44X 

I.T44XX 

I 145 

I.T45A 

LT45B 

L.T45D 

L T45E 

I T45C1 

I. [4!>r 

I.T4MT 

114!:,/ 

IT45XX 



003/16 

003760 
003 766 
004120 
004146 
004130 
004140 
003646 
003636 
004 1 76 
01c? Us? 
012166 
012262 
012266 
012272 
012306 
012502 
012534 
012636 
012652 
012700 
012720 
012764 
013000 
013030 
0125/2 
013050 
013064 
0131 /4 
013210 
013242 
013274 
013122 
013314 
013324 
013330 
013414 
0x3426 
013436 
013452 
013500 
013502 
013542 
013356 
013562 
013572 
013576 
013704 
013720 
013750 
013662 
0136 74 
014002 
013624 
014026 
014030 



18 75 

1894 

19000 

1896 

1929 

1897 

1899 

18780 

18760 

1873 

1540 

1541 

2877 

28840 

1542 

1543 

2914 

1544 

29500 

2951 

2955 

2959 

29710 

2972 

2976 

1545 

2980 

1546 

30080 

3009 

3013 

3022 

1547 

3017 

2993 

1548 

30460 

304 7 

30520 

3053 

3057 

30620 

3063 

1549 

3069 

30770 

1550 

30980 

3099 

3103 

30920 

30^3 

3111 

1551 

3118 

31220 



18890 
18980 

1924 
19310 
19280 
19300 
1925 

1886 
28660 
2866 
28830 

28890 
2889 

2918 

29360 

2953 

29540 

29600 

2964 

2974 

29750 

29810 

2942 

2984 

29920 

3011 

30120 

30180 

30250 

2996 

3028 

30320 

30360 

S049 

30500 

3055 

30560 

30610 

30700 

3039 

3073 

30820 

3101 

31020 

31070 

3095 

30960 

31140 

508?. 

31200 



1927 



1935 



1933 



1923 
28680 



28910 
29200 



19360 



294 30 
29860 



29980 
30300 



3040.7 
30750 



30860 
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40. '6 












40.*.' 












40i\S 












40?9 


027122 


052045 


050131 


020105 


MMSGOj 




027130 


051103 


053440 


042510 






027136 


020116 


042522 


042101 






027144 


035331 


043 






4080 


02714 7 


045 


046445 


05251/ 


MMSGl: 




027154 


052116 


052040 


050101 






02/162 


020105 


044527 


044124 






027170 


047040 


020117 


051127 






027176 


052111 


020105 


044522 






027204 


043516 


020054 


04 7514 






02/212 


042101 


052040 


02011 7 






027220 


04/502 


026124 


051440 






027226 


052105 


052C40 


020117 






027234 


047117 


046040 


047111 






027242 


035105 


043 






4081 


027245 


045 


042523 


020124 


MMSG2* 




027252 


04 7524 


047440 


043106 






02 7260 


044514 


042516 


021472 




4082 


027266 


046445 


053117 


020105 


MMSG3 i 




027274 


04 7506 


053522 


051101 






027302 


020104 


047524 


042440 






027310 


052117 


020054 


04711/ 






027316 


044514 


042516 


0214/2 




4065 


02 7324 


052445 


046116 


040517 


MMSG4 : 




027332 


026104 


044440 


051516 






02/340 


051105 


020124 


05112/ 






027546 


052111 


020105 


044522 






•^27354 


043516 


020054 


047514 






027362 


042101 


052040 


020117 






027370 


04 7502 


026124 


047440 






02 7376 


043106 


044514 


042516 






027404 


043040 


051117 


040527 






027412 


042122 


050040 


051501 






02/420 


020124 


047502 


026124 






027426 


04 7440 


020116 


044514 






02/4 34 


042516 


04 3 






4064 


0274 3/ 


045 


04644S 


053117 


MMSG5 : 




027444 


020105 


040524 


042520 






02/452 


052040 


02011/ 


047502 






02/460 


035524 


047440 


020116 






02/466 


044514 


042516 


043 





( ) 



j MANUAL INSTRUCTION*** ++*♦*++ 
.ASCII /*TYPE CR WHEN READY j 4/ 

.ASCII /AMOUNT TAPE WITH NO WRITE RING, LOAD TO BOT, GET TO ON LINE:*/ 



SEQ 0115 



ASCII /tfSET TO OFFLINE :tf/ 



ASCII /tfMOVE FORWARD TO EOT, ONLINE:*/ 



ASCII /^UNLOAD, INSERT WRITE RING, LOAD TO BOT, OFFLINE FORWARD PAST BOT, ON L 



.ASCII /**MOVE TAPE TO BOT; ON LlNEtt/ 



M1.0 
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MSG10 

MSG11 

NSG12 

MSG13 

MSG14 

MSG15 

MSGlb 

MSG18 

HSG19 

M5G2 

MSG2A 

MSG20 

MSG21 

MSG22 

NSG23 

MSG24 

MSG25 

MSG25A 

MSG26 

MSG2: 

MSG3 

MSG30 

MSG31 

MSG32 

MSG33 

MSG34 

MSG35 

MSG36 

MSG37 

MSG4 

MSG40 

MSG41 

MSG42 

M5G45 

H5G44 

MSG4S 

M5G46 

MSG4 7 

MSG5 

MSG50 

MSG51 

MSG53 

M5G54 

M5G5?: 

M5G56 

MSG5 7 

M'JG58 

M5G59 

MSG6 

MSGbO 

MSG62 

M5G63 

MSGb4 

r15G65 

M5Gb*> 

MSGb 7 



021704 

021730 

021755 

021764 

02177 3 

022010 

02202b 

022036 

022055 

021165 

021226 

022074 

022126 

022164 

022205 

022240 

02226b 

022315 

022342 

022371 

021355 

022405 

022413 

022431 

02244 7 

0224 70 

022505 

022523 

02254 1 

02137 7 

022557 

022563 

022602 

02261 ? 

022 723 

022 745 

02276/ 

0230/3 

021415 

023125 

023144 

023173 

023205 

023216 

023313 

023340 

023517 

023542 

021435 

023544 

02354b 

02 3b 14 

023642 

023660 

023hb5 

023672 



1853 

1848 

3339 

3343 

196b 

1 970 

33SO 

1996 

2021 

175b 

1754 

2049 

2077 

2083 

2089 

2115 

2119 

2123 

2142 

2169 

1786 

1918 

3455 

3451 

3458 

3998* 

399S* 

4000* 

4001* 

1816 

3769 

1727 

3067 

35b2 

1594 

1603 

3368 

3431 

1819 

2538 

3308 

3023 

3112 

2961 

1655 

163/ 

1646 

3728 

332 7 

3737 

1585 

36/5 

1900 

1903 

190b 

1665 



MACY11 



3976* 

3977* 

3504 

3508 

3980* 

3981* 

3514 

3983* 

3192 

3964* 

3965* 

3985* 

3986* 

3987* 

3988* 

3989* 

3990* 

3991* 

3992* 

2192 

3967* 

3994* 

3995* 

3996* 

3997* 



1822 

4002* 

4003* 

4004* 

4005* 

4007* 

4008* 

<009* 

4011* 

3969* 

4012* 

4013* 

4014* 

4015* 

4016* 

4017* 

4018* 

4021* 

4022* 

39 70* 

4023* 

4024* 

4025* 

4026* 

402 7* 

4028* 
4029* 
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CROSS REFERENCE. TABLE -- UStR SYMBOLS 



39 78* 
3979* 



SfcQ 0129 



3982* 
3984* 



2214 



2240 



3993* 



3968* 



1 

» . 
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LOGIC TEST <U3: INTERRUPT TEST 



PURPOSE: TO VERIFY THE' OPERATION OF THE RH INTERRUPT LOGIC, 

PROGRAMMED SEQUENCE: THE CI REGISTER IS CLEARED. PRIORITY IS SET, 
THE INTERRUPT ENABLE BIT IS SET AND THE INTERRUPT IS AWAITED. 

I IKEL1 i'AU.T LOCATION! 

CIRCUITS PRINT REFERENCE 

INTERRUPT CONTROL BCTE 

MANUAL INTERVENTION TESTS 14,15.16,17 



I OGIC TEST 014 } STATUS AT BOT , ON LINE, LOADED, NO WRITE RING 



PURPOSE t TO TEST FOR THE PRESENCE QF* MOL ,WRL ,DPR ,DR t .BOT . 

PROGRAMMED SEQUENCE: THE OPERATOR IS INSTRUCTED TO LOAD THE 
DRIVE WITH A TAPE MINUS THE WRITE ENABLE RING AND PLACE 
THE DRIVE ON LINE AT BOT MOL ,WRL ,DPR,OR> ,BOT ARE CHECKED. 

IIKEL.I FAULT LOCATION: M8910.SLAVE CABLE, M8935 
CIRCUIT HRINT REFERENCE 



MOL LAW6, TCCM;,MH^08,M>L)0l r A , i C 

WRl [ AW8 , T CCM 7 , M8008 , M*«)0 1 > rt , i r 

dpr tccm; 

DRf TCCH7 

BOT i AW6 , TCCM ? , M8908 l A , MH91 * , i A 
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SEQ 0015 
LOGIC TEST G15: STATUS AT BOT ,0F TLtNE .LOADED. NO WRITE RING 

PURPOSE: TO TEiST ATA,DPR,DRl , SSC 

PROGRAMMED SEQUENCE: OPERATOR IS INSTRUCTED TO TAKE DRIVE 
UPLINE: ATA, SSC, DPR, DRY ARE CHECKED. 

i IKEL> KAUl T LOCATION: M8910.M6933,M8909, SLAVE CABLE 
CIRCUIT PRINT REFERENCE 



SSC l.AU8,M6913,M8913YA,TCCM7 

ATA MBI3 

LOGIC TEST t>lb: STATUS AT EOT, ON LINE, LOADED, NO WRITE RING 

PURPOSE: TO TEST EOT, SSC. SLA 

PROGRAMMED SEQUENCE: THE OPERATOR IS INSTRUCTED TO M0V6 TO EOT 
AND PLACE THE DRIVE ON LINE. EOT, SSC, SLA ARE CHECKED IN 
ADDITION TO ATA,MOL , WEI ,DPR , DRY 

LIKEL' f'AU f LOCATION: M8910.SLAVE CABLE, M8953 
CIRCUIT PRINT REFERENCE 



SSC LAU8,M89t3,M89l5rA, TCCM/ 

f OT LAW6,TCCM7,M890fl>A,Mft<H*»A 

SI A LAU8,TCCM/,M900iYA,YC,M890tt 
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LOGIC TEST #17: STATUS AT ONI. INK I OADbO 

TEST 17 IS EXACTL1 LIKE TLST 16 EXCEPT 1HAT !HK DRIVl IS 
REVERSED OFF' OF EOT AND THE WRITE ENABLE RING IS INSTALLED, 

ft*********************************************** 
EACH OF THE NEXT 11 TESTS ARE DESIGNED TO VERIFY 
THE ABlLin TO SET SPECIFIC ERROR BITS. 

LOGIC TEST #<?0: ILLEGAL FUNCTION 



PROGRAMMED SEQUENCEt THE WORD COUNT IS SET TO 1. ALL CODES 
STORcD IN THE ILLEGAL FUNCTION TABLE ARE LOADED AND II F IS 
CHECKLD FOR EACH ONE. THEN UNEXPECTED ERRORS ARE CHECKED* 

LIKELY FAULT LOCATION: M69Q9 

CIRCUIT PRINT REFERENCE 



SET H.F DECODE MBI5»MB17 

Il> FLOP MBI11 

ILF MULTIPLEXER MFJI10 
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LOGIC TEST C21t REGISTER MODIFICATION REFUSED 



PROGRAMMED SEQUENCE; INIT, SELECT SLAVE AND DRIVE. LOAD 500 
a TAPE CONTROL REGISTER LOAD WAM3 IN THE MAINTENANCE 
REGISTER. LOAD THE CI REGISTER WITH A READ COMMAND AND GO 
BIT. ATTEMPT TO WRITE THE FRAME COUNT REGISTER. READ 
ERROR REGISTER. CHECKING TOR RMR . CHECK FOR UNEXPECTED ERRORS 
WAIT FOR ACCL. DELAY. DO EOP CLEAR, 

LIKELY FAULT LOCATION: M8909 

CIRCUIT PRINT REFERENCE 



RMR DECODE MBIc? 

RMR FLOP MBIU 

RMR MULTIPLEXER MB 1 10 

LOGIC TEST 022: CONTROL BUS PARITY (CPAR) 

PROGRAMMED SEQUENCE,- WRITE ?0(8) INTO CS2. ENABLING THF. 
WRITING OF EVEN PARITY ON MASSBUS. WRITE ALL ONES TO 
FRAME COUNT. RESET PAT. CHECK ERROR REGISTER FOR CPAR CHECK 
FOR OTHER UNEXPECTED ERRORS. 

LIKELi FAULT LOCATIONS; 118909 

CIRCUIT PRINT REFERENCE 



MASSBUS PARITY TREE MBI4 

CPAR FLOP MBIU 

CPAR MULTIPLEXER MFJIXO 
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10GIC TEST tf23; FORMAT ERROR (FMT) 



PROGRAMMED SEQUENCE : AN ILLEGAL FORMAT CODE IS LOADED INTO 

THE TAPE CONTROL REGISTER. MAM 3 IS LOADED INTO THE MR 

READ COMMAND AND THE GO BIT IS SET, THE ERROR 

REGISTER IS CHECKED FOR FORMAT ERROR AND UNEXPECTED ERROR 

BITS. THIS SEQUENCE IS REPEATED FOR ALL ILLEGAL FORMAT CODES 

1.1KEL1 FAULT LOCATIONS: M8905-YB .M8906.M8909 
CIRCUIT PRINT REFERENCE 



FORMAT LITS MR6 

il> DECODE BF'3 

ILF FLOP MBI11 

ILF MULTIPLEXERS MBI10 

LOGIC TEST 024: DATA BUS PARITY ERROR (DPAR) 

PROGRAMMED SEQUENCE: SET UP A WRAP 2 AS FOLLOWS: 

NORMAL FORMAT > TAPE CONTROL REGISTER, -10 -- -> WORD 

COUNT, 20 > FRAME COUNT, WAM2 - - > MAINTENANCE RE 

GISTER,. LOAD WRITE COMMAND AND GO BIT. SET PAT BIT IN 
CS2. AFTER A DELAY MR IS LOADED 4 TIMES CAUSING 2 DATA 
BUS TRANSFERS. DPAR AND CPAR ARE CHECKED. THEN A CHECK 
FOR UNEXPECTED ERRORS IS MADE MASKING OPI. 

LIKELY FAULT LOCATIONS: DBUS LINES. M8905-YB. M89Q6 
CIRCUIT PRINT REFERENCE 



MM CLK MR r > 

WRT CLK GENERATION TCCM4 

DPAR FLOP MBIU 

DATA BUS PARITY TREE QKJ 



c; 



i 
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t OGIC TEST #<?Sj NONEXECUTABLE FUNCTION (NED 

PROGRAMMED SEQUENCE: LOAD FC WITH i, SET WAM <? . SET 
WRITE AND GO. ILF SHOULD SE I DUE TO TOO SMALL INITIAL 
FRAME COUNT. CHECK ILK, CHECK FOR UNEXPECTED ERRORS. 

LIKELY FAULT LOCATION} M8909 

CIRCUIT PRINT REFERENCE 



NEF FLOP MBI11 

NEF MULTIPLEXER MB 1 10 

SET NEF MBI7 

LOGIC TEST #26: FRAME COUNT ERROR 



PROGRAMMED SEQUENCE: SET WC TO -10, FC TO -20 WAM3 IN 



MAINTENANCE REGISTER, LOAD WRITE AND GO, DELAY ISSUE MM OR 
CLEAR, CHECK FCE AND CHECK FOR UNEXPECTED ERRORS. FRAME 
COUNT ERROR SHOULD BE SET BECAUSE A WRITE OPERATION WAS 
TERMINATED PRIOR TO A WORD COUNT OVERFLOW. 

LlKELt FAULT LOCATIONS: M8909, MB CABLE, M8933, M89Q5-YB 
CIRCUITS PRINT REFERENCE 



RUN LINE 


MB1 


EBL PLS 


MB 1 4 


FCf FLOP 


MBIlt 


SHUTDOWN LOGIC 


TCCMb 


MAINT. FUNCTION DECODE 


MR 5 



SEQ 00L9 



- > 
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10GIC TEST <tf7: ILLEGAL REGISTER 



SEQ 00^0 



PROGRAMMED SEQUENCE.: IF THE RH HAS All MASSBUS REGISTER 
OPEN (MOST SYSTEM IN THE HELD DON'T\ ALL THE ILLEGAL 
REGISTER ADDRESSES ARE READ, CHECKING THE ILR BIT AFTER 

EACH ATTEMPT. 

LIKELY FAULT LOCATIONS: MASSBUSS , M8909 



CIRCUITS 



PRINT REFERENCE 



REGISTER SELECT LINES 
REGISTFR SELECT DECODE 
ILR FLOP 



MB1, MB2 

MBI? 
MBIU 



LOGIC TEST &30: DRIVE TIMING ERROR 



PROGRAMMED SEQUENCE: 



THE MAINTENANCE REGISTER IS LOADED UITH A FUNCTION THAT 
IS DESIGNED TO CRIPPLE OCCUPIED. FRAME COUNT REGISTER IS 
CLEARED TO SET PCS LOAD WRITE COMMAND AND GO BIT. CHECK 
FOR DTE. THEN DRIVE IS INITIALIZED. FCS IS SET AND WRP 
3 CODE IS LOADED INTO MR. WRITE COMMAND AND GO BIT ARE 
SET. AFTER DELAY FOR ACCELERATION, THE MR CLOCK IS GENERATED 
AND ANOTHER CHECK IS MADE FOR DTP. FINAL CHECK IS MADE 
FOR ERRORS OTHER THAN OPI. THE FIRST MAINTENANCE REGISTER 
CODE WHICH CRIPPLES THE OCCUPIED RECEIVER CAUSES OCCUPIED 
TO BE ASSERTED AND TESTS THE CIRCUITRY WHICH CHECKS FOR 
OCCUPIED WHEN A DATA TRANSFER COMMAND IS INITIATED. Wl 
SECOND TEST UTILIZES THE FACT ThAT THE WRP 3 CODE INHIBUS 



THE MASSBUS WCLK RECEIVER CREATING A 
IS NOT FOLLOWED BY A WRITE CLOCK. 



SITUATION WHERE SCI l< 



1 IKELY FAULT LOCATIONS: M8909, M8905 YFj , M8 f >06 , MB CABLES 



CIRCUITS 



PRINT REH-RhNCfcS 



DTE HOP 

CRIPPLE OCCUPIED FUNCTION 

WRP * FUNCTION 

PREVIOUS OCCUPIED CHECK 

CHECK FQR WCLK 

MM CLK 



MB L 1 1 

MRS 
MRS 
MB I ! 
B> .■ 
MRU 



C/M/UO IM03-TIU. \v:; CH 1 MACU1 50(1046) Oh APR -84 09:48 PAGE JO 

C/TtAt.Pll 0&-APR-84 09:45 stQ 02l 

LOGIC TEST 51: OPERATION INCOMPLETE (UP1) 

PROGRAMMED SEQUENCE: 

SET UP INCLUOES FORMAT , WRP ? (BIT FIDDLER WRITE), ECS. 
WRITE COMMAND AND GO BIT ARE SET AND THE PROGRAM DELAYS 
FOR OPI, A SECOND TEST INVOLVES SETTING UP URP 5 AND 
ISSUING A READ COMMAND. ESSENTIALLY THIS TEST UTILIZES 
THl WRAPAROUND CODES TO PREVENT ANY RECORDS BEING DETECTED 
AFTER A READ OR A WRITE COMMAND IS ISSUED. 

I IKEL.1 FAULT LOCATIONS: M8933, M8909 

CIRCUITS PRINT REFERENCES 

OP I TIMER 

OP I FLOP 

OPI TIMER CONTROL 

LOGIC TEST 5.-?: UNSAFE (UNS) 

PROGRAMMED SEQUENCE: 

A NON-EXISTANT SLAVE IS SELECTED AND A READ COMMAND IS ISSUID. 
UNSAFE ERROR IS CHECKED. IF THE DRIVE TiPE REG INDICATES A TU/7 
THEN NON EXECUTABLE FUNCTION (NET) IS ALSO CHECKED. 

LIKELY FAULT LOCATIONS: M89Q9, M8910, SLAVE CABLE 
CIRCUITS PRINT REFERENCES 



TCCMS 


MBI11 


MBI7 



UNSAFE > LOP MB 111 

St. T UNSAf i MB I / 

MUL GENERATION lAWt* 



J, 1 
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lOHIC TEST S3: POSITIONING IN PROGRESS IPIP) 
PROGRAMMED SEQUENCE: 



SET UP DRIVE AND SLAVE ARE SELECTED, ECS IS SET. A SPACE 
COMMAND IS ISSUED AND PIP IS CHECKED. 

LH<EL> FAULT LOCATIONS: M8909, M8933 

CIRCUITS PRINT RE1-ERENCES 



SPACE FUNCTION DECODE MB IS 

PIP GENERATION TCCMZ 

STATUS REGISTER TCCM7 



LOGIC TEST 34: PHASE -ENCODED STATUS (PES) 
PROGRAMMED SEQUENCE: 



DENSITY CODES 4 ARE. LOADFD AND PI S IS CHECKED FOR EACH 
CODE. IT IS EXPECTED ONLY F- OR DENSITY 4. 

LIKELY FAULT LOCATIONS: M8905-YB. SLAVE BUS, M8931, M&933 
CIRCUITS PRINT REFERENCES 



DENSITY BITS MRt. 

DENSITY LINES SBC 

PES CIRCUIT SCS 

PFS STATUS BIT TCCM7 



StQ OVd'd 



i ■ t 
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LOGIC TEST 35; TAPE CONTROL WRITE (TCW) 

PROGRAMMED SEQUENCE: 



SETUP FORMAT AND WRP-3 ARE SET, HEAD COMMAND IS ISSUED. 
TCW IS CHECKED. DRIVE IS INITIALIZED, TAPE CONTROL REG 
ISTER IS WRITTEN TO AND TCW IS CHECKED. 

LIKEL1 FAULT LOCATION: M8905-YB 

CIRCUIT PRINT REFERENCES 

TCW MR6 

LOGIC TEST 36: FRAME COUNTER STATUS (FCS) 

PROGRAMMED SEQUENCE: 



DRIVE IS INITIALIZED. FCS IS CHECKED, DRIVE IS INITIALISED, 
FRAME COUNTER IS WRITTEN TO, AND FCS IS CHECKED. 

LIKELi FAUl T LOCATIONS; M8909, M8933 

CIRCUITS PRINT REFERENCES 



yC\> BTI MM 18 

FCS MULTIPLEXER TCCM7 
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LOGIC TEST 37; ACCELERATION (ACCL) 
PROGRAMMED SEQUENCE: 



DRIVE IS INITIALIZED, FORMAT IS SET AND ACCL IS CHECKED 

FOR ONE. WAM 3 CODE IS LOADED, READ COMMAND IS ISSUED. 
AFTER A DFLAY ACCL IS CHECKED FOR ZERO. 

LIKELI FAULT LOCATIONS: M6933 , M8931 

CIRCUITS PRINT REFERENCES 



ACCL BIT, MOTION DELAY COUNTER TCCM3 
CLOCK SC2 



LOGIC TEST 40: PE TAPE MARK (TM) 

PROGRAMMED SEQUENCE: 



DRIVE IS INITIALIZED, WAMO IS SET. WRITE TAPE MARK IS SET 
AFTER DELA V TAPE MARK BIT IS CHECKED. WAMO MULTIPLEXES 
THE OUTPUT OF THE WRITE DATA GENERATOR ONTO THE RDA LINES 
THE DATA SYNC MODULES SYNC ON THE DATA AND SEND ENVELOPE 
INFORMATION TO THE TAPE MARK DETECTOR ON M8933. 

LIKELY FAULT LOCATIONS: M8932, M6901, M8933. M8905-YB 

PRINT REFERENCES 



TAPE MARK DETECTOR TCPE4, TCPE5 

TAPE MARK MULTIPLEXER TCCM/ 

ENVELOPE SIGNALS DS 3, !>, V 

WRITE DATA BUFFER TCCM.'* 

RDA MULTIPLEXERS ICCMt, 

WRITE TAPt MARK FUNCTION MB 1 5 

WAMO SIGNAL MRS 



SEQ 0024 



M, 
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I OGIC TEST 41: NRZ TAPE MARK ( TM VP£ , ITM) 

PROGRAMMED SEQUENCE 



SAME AS TEST 40 EXCEPT NR7 DENSITY IS SELECTED, 
L TKFl t KAU T LOCATIONS: M8933* M8934 



CIRCUITS PRINT REFERENCES 



WRITE DATA BUFFER TCCM2 

RSDO MULTIPLEXER TCCM6 

RDA MULTIPLEXERS TCCM6 

TM DETECTOR CNRZ4 

ILLEGAL TAPE MARK FLOP CNR^4 



N 



( .. 
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THE NEXT 5 TESTS CONSISTS OF WRITING ON TAPE USING MAIN- 
TENANCE MODE FUNCTIONS TO FORCE ERROR CONDITIONS TO CHECK 
THE ERROR CHECKING CAPABILITIES, OCCASIONAL ERRORS MAY 
RESULT FROM TAPE DEFECTS. CONSTANT ERROR MAY BE THE 
RESULT OF PROBLEMS WITH ERROR CHECKING CIRCUITRf OR 
PROBLEMS WITH THE DRIVE. DEBUG OF THE PROBLEMS MAY BE 
EASIER USING DATA RELIABILITY OF UTILITY DRIVER. 

LOGIC TEST 42: CYCLIC REDUNDANCY ERROR 
PROGRAMMED SEQUENCE: 



FIRST THE DIAGNO" IC PERFORMS A URAPO DESIGNED TO LOAD 
THE CRC CHECKER J^ A KNOWN MANNER. CHECK ARE MADE FOR 
LRC ERROR AND TH'c CONTENT OF CRC REGISTER. THEN A WRITE 
OPERATION IS PERFORMED USING A MAINT. MODE (IICC) WHICH 
INHIBITS THE INITIALIZATION OF THE CRC CHECKER. THE CRC 
CHECKER I OGIC WHICH HAS NOT BEEN CLEARED SHOU DETECT 
A CRC ERROR. UNEXPECTED ERROR BITS MAY INDICATE PROBLEMS 
WITH THE WRITE OPERATION. 

LIKELY FAULT LOCATIONS: M8905-YB, 18934, G056, SLAVE CABLE 
M8910 

CIRCUITS PRINT REFERENCES 



MM FUNCHON DECODE MR^> 

CRC CHECK CIRCUIT CNRZ3 

L OGIC TEST 43: LRC 

PROGRAMMED SEQUENCE- 



A WRITE OPERATION IS PERFORMED WITH A MM r UNCTION (INC IMRL) 

WHICH ASSERTS WDCSB) 51. THROUGHOUT THE RECORD. All ONES 

DATA IS USED SO THAT THE FUNCTION ONI t INTERFERES WITH 

THE WRITING OF THE LRC CHARACTER UHEN NONE Of THE TM03 

WRIT* DPTA LINES SHOULD BE ASSERTED. 

** NOTE: THIS TEST IS NOT PERFORMED ON A To/; ^ AVI . 

LIKEl.f FAUL1 LOCATIONS: M85Q5. M8933, M8910, M8').M 
CIRCUITS PRINT REM PENCE V 

MM FUNCTION 0\ CODE MRS 

UW T E I INE DRIVERj !CCM t - 

uPiTF" HMD DRIVERS 1 ij< ( 4 

LRC CHECKING CNR/3 



[ 



) ) 
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SEQ 002 7 



LOGIC TEST 44; PF CORRECTABLE DATA 



PROGRAMMED SEQUENCE: 



A Pfc WRITE OPERATION IS PERFORMED USING A FUNCTION WHICH 
WILL GROUND THE BIT STROBE LINE ON BIT 1, THIS SHOU D 
CAUSF THE BIT1 DEAD TRACK FLOP TO ASSERT AND CAUSF COR 
ECTABIF DATA ERROR. THE DEAD TRACK REGISTER IS CHECKED 
■■"OR BIT 1. 

I iKELTr FAULT LOCATIONS: M8905-YB, M8901 , M89 52 



CIRCUITS 



PRINT REFERENCE*) 



MM FLECTION DECODE 
BIT STROBE CIRCUIT 
DEAD TRACK FLOP 
DEAD TRACK REGISTER 



MR 6 ) 

DS4 

DSS, TCPF.c? 

MR4 



LOGIC TEST 45: Pfc INCURRECTABLE DATA 



RFPEAT OF TEST 44, EXCEPT THAT THE MAINT . MODE FUNCTION 
GROUNDS BITS STROBE FOR BITS t, t AND THE WD LINl FOR BIT 
r . IN HELD ASSERTED, INC. DATA AND PC*' ERRORS ARE EXPECTED 

LIKFL1 FAU T LOCATIONS: M.895^, M8901 



CIRCUIT 



PRINT RFFfcRENCt 



INC ERROR, Pfc'F, 



TCPE 



c ' > 
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LOGIC Tf ST 4foj PL FORMAT 

THfc MM FUNCTION USED IN THIS TEST INVERTS THE DATA USED 
IN PRFAMDLt AND POSTAMBLE OF BIT ONE. 

LIKELY FAULT LOCATIONS! M9932, M8933, M8905-lrB 
CIRCUITS PRINT REFERENCES 



PEF\ TCPF? 

WRITE BUFFER TCCM2 

MM DECODE MR5 



LOGIC TEST 47: FRAME COUNT OVERFLOW 



THIS TEST USES A WRAP,? TO CHECK THE OVERFLOW OF FRAME 
COUNT REGISTER, 

LIKEL1 FAULT LOCATION: M8909 
FRAME COUNT REGISTER M8I8 

LOGIC TEST 50: NEF WHEN WRITING PE ON NR/ SELECTED SI AVE 



THIS TEST ENSURES THAT WHEN A SLAVE IS IN NR/ MODF A WRITt 
OPERATION WHEN OFF ROT IN PE MODE RESULTS IN A NON -EXECUTABLE 
^UNCTION AND SETS THE NEF BIT IN THE ERROR REGISTER. 

PROGRAM SEQUENCE: 



THE SELECTED SLAVE IS REWOUND AND PLACED IN NR/ MODE AND SPACED 
OFF BOT. A PE WRITE OPERATION IS INITIATED, AND THE NEF BU 
IN THE ERROR REGISTER IS CHECKED. 



LOGIC TEST 51: NEF WHEN WRITING NR/ ON PF SHFCTED SLAVF 
THIS TEST IS THE COMPLEMENT OF LOGIC TfcST v >0 AHUVF . 



SEQ 0028 



D 



/ 
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SEQ 002'* 



131 i 
1313 

i3i? 
1314 
13 is 



1313 
1314 

1330 

1331 



1334 



133: 

133K 

1339 
1330 
1331 
1373 

13?? 
1334 
1335 
1236 
13?' 
1338 
1334 
1340 
1341 
1343 
134? 
1344 
134?'. 
134* 
134 ' 
134* 
134'* 
1350 
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.TITLE. C7TEAE0 TM03 - TE 16/TU77 CTL 
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jJ.G. ADAMS 
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MODULE REFERENCES 


TO 


j*»B REFLECT 


TM03 MODULES 
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j f INDICATES 1 


ENHANCEMENTS TO 





{REVISED 
{REVISED 
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THE ORIGINAL REV (D/TE.AA) 
NECESSARY FOR TM03 
IEBLANC |BL. FIXED AIDS OCC0001330 
BY J. HITT {ADD XON/XOFF FUNC T IONAl I T r 

{MAKE TEXT CHANGES 



>MCALL 
.NLIST 
.LIST 
.ENABLE 



.♦ACT11 

MC 

ML 

ABS.AMA 



NON STANDARD JUMPER MODE CSEE 4.3 IN DOC*) 
*EOP, $CATCH ( SSAVE, SRESTORE , $CHAIN, $CHNM0DE 



{CONSOLE SWITCHES' 



{ SW15j 1-HALT ON ERROR 

; 0-CONTINUE 

jSW14{ 1-LOOP ON ERROR 

} 0- CONTINUE 

;SW13: 1-DO NOT PRINT ERRORS 

{ O-PRINT ERRORS 

jSW13j 0-CONTINUOUS CyC : .* 

{ l-HALT AT END 0* PAS'. 

jSWU: I-INHIBIT ITERAUONS 

{ 0-DO ITERATIONS 

iSWIO: 1-HALT AT END 0> EACH It ST 

i 'CONTINUE 

{SW9; 1-DO MANUAL INTE RVE NT I Of- TEST' 

{ 0- INHIBIT MANUAL PjUNVl NT ION 



lSU0-5i SELECT TEST NUMBER 



00 'ALL TtVi 



C/HAK> TM03 
CZTKAh.PU 

12S2 
12S3 
12M 
12tt> 

12?6 

i2:> : 

12S8 
1260 

X f. t> 1 

1262 

1265 
1264 
126S 
12t»c 
126 ' 
12*8 
l?t»9 

12 70 

12"! 
1272 
1273 
1274 
127S 
1276 
1277 

1278 
12">9 

128C 
1281 
1282 
128* 
1284 
1285 
128* 
128" 
1288 
1289 
1290 
1291 
1292 
1293 
1294 
129S 
12'* 
1297 
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I Tf. 16 REGISTER BITS********** 



SEQ 0030 



jCSl: 

jWC: 

jBAj 

*rc: 

;CS2: 

;DS: 

;ER: 

,-ATSj 

jCC: 

}0B: 

iMRj 

jDT: 

{SN: 

jTC: 



;15 i 14 jl3 t 12 ill i 10 j09 t 08 }07 t 06 ;05 j04 j03 j02 ;01 jOO j 

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx 

SC jTREjMCPjSPRfDNAjPSL{A17,A16tRDYjre: {FUNjFUN jFUN{FlJN } FUN;GO ; 
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX/ 

WORD ; 

COUNT . 

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

BUS . 

ADDRESS ; 

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

FRAME . 

COUNT 
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXa 
DLTjWCEiUPEiNEDiNEMiPGE|MXF»MDP|OR i IR jCt.R »PAT jBAI jU2 ;U1 jUO : 
i I 1 t ; ; {ERR; } j i j j j j j 

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 
ATA;ERR}PIPjMOLjWRL|EOT{XXXjDPR|DRY,SSCiPESjSDN|IDBjTMKjBOT{SLAs 
i i J t J i i i t J i J ; j j i 
*'.XX/XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 
CDEiUNSiOPIiDTEjNEFiCS jFCE jNSGjPEF j INC;DAT ;FMT ;CNT jRMR j IlRj ILF t 
CRC; j i i ;ITM { ; jLRCj VPE jBPE; jBPF.j ? } ; 

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

ATTENTION . 

SUMMARY j 

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

CHECK . 

CHARACTER . 

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

DATA j 

BUFFER 
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 
DB jDB iDB sDB jD8 {DB jDB ; DB jDH tWRTjMM { 0P ;0P 5 0P 5 0P ;MM ♦ 

7|6|5|4|3|2|1|0|P iCLKjCI.Ki 4 ; 3 ; 2 ; 1 jGO ; 
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

DRIVE j I i ,SLVi 

TYPE {CH i jPR j j 

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

SERIAL . 

NUMBER ; 

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 

ACLjFCS}SACjENA{SPRiDENjDFNiDENiFM T {FMT}FMT}FMT{bVN{SSN;SSN;SSN; 

; I {DT j i 4 ; 2 j 1 i 8 { 4 ; 2 ; 1 jPAR? 4 ; 2 j 1 ; 

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 



/, 



c/n- ak> iMOJuit tu/; cu i 

CZTf.AK.Pll Ob -APR -84 09:45 



1299 






1300 






1301 




000000 


1502 




000001 


1303 




000002 


1304 




000003 


1305 




000004 


130o 




000005 


150' 




000006 


1308 




000007 


1309 






1311 






CI) 






CI) 




000764 


en 




000042 


vP 


000042 


000000 


en 




000046 


i n 


000046 


002666 


«,n 




000052 


en 


000052 


000000 


en 




000764 


en 






1312 






1313 






1314 




000060 


1315 


000060 


017256 


1316 


000062 


000340 


1317 






1316 






1319 






1320 




0001 76 


1321 


000176 


000000 


1322 






1325 






1 324 




000200 


1 325 


000200 


000137 001334 


1326 






132? 






1328 




000210 


1320 


000210 


000137 002226 


1330 






1531 






1332 






1333 




000224 


1334 


000224 


01724b 


13 V. 


000226 


000340 
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{REGISTER EQUIVS+********* 

R0-*0 
Rl-Kl 
R2**2 
R3-H3 
R4»*4 
R5«*5 
SP»#6 
PO*7 



SEQ 0031 



; ACT 11 HOOK ***********. 
$SVPC- 
,'42 

. WORD 
. '46 

.WORD $ENOAD 
. '52 

.WORD 
.«$SVPC 



{SAVE CURRENT LOCATION CTR 



5 SET LOCATION 46 

{SET LOCATION 52 > 
{RESTORE LOCATION CTR 



jTTY INTERRUPT VECTOR**** ***♦+♦ 



. «60 

• WORD 
.WORD 



TTINT jTTY INTERRUPT HEADER ADDRESS 
340 {PRIORITY LEVEL 7 



1336 



i SOFTWARE SWITCH REGISTER*********** 

{USED IF HARDWARE SWR * 177777 OR NOT AVAILABLE 

. -176 
SWRfcG: .WORD {SOFTWARE SWITCH REGISTER 

{START ADDRESS********** 

.»200 

JMP START {PROGRAM START 

{RESTART ADDRESS********** 
.'210 
JMP ST2 

;TM03 INTERRUPT VICTOR*** ♦*♦♦♦* ♦ 

. -224 

MTTNT {TAPE INTERRUPT HANDLER ADDRESS 

340 



13 



c/teat-o iMos-Tt-.it> iu.\' cu i 

CZTEAE,PU 06 -APR 84 09; 45 
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SEQ 0035 



1358 






1SJ«4 




000510 


1340 






1341 






134 J? 


000510 


175440 


1343 


000515 


175445 


1344 


000514 


172444 


1345 


000516 


1 75446 


1346 


000550 


175450 


134? 


00052,: 


175455 


1346 


000554 


175454 


154* 


000556 


175456 


1 350 


000530 


175460 


1351 


000535 


175465 


135 J 


000534 


1 75464 


1553 


000536 


172466 


1354 


000540 


1754 70 


1355 


000542 


172472 


1356 






1357 






1358 






1359 


000544 


005405 


1360 


000546 


007415 


1361 


000550 


016453 


1362 


000555 


02043/ 


1363 


000554 


055443 


1364 


000556 


02544? 


1365 


000560 


031455 


136t> 


000565 


033465 


136" 


000564 


036473 


13b8 






136* 






1370 






1371 


000566 


177 7 76 


1375 


0005 70 


177570 


13 73 


000575 


177560 


1374 


000574 


17 7562 


1375 


0005 7b 


17 7564 


1376 


000600 


17 7566 


1 3 7 .' 


00 OK) 5 


000020 


1378 


000604 


000554 


1379 


000606 


175440 



CI 
WC 
HA 
EC 

cs 

DS 
fR 

AS 
CC 
DB 
MR 
DT 
SN 
TC 



ILFT 



PSW 
SWR 
Tl<5 
TKB 

TPS 

tpb 

TTAMT 
Vl.CT : 
REGS; 



. -510 

iMASS BUS REGISTER EQUIV5*+**+*++++ 

175440 
175442 

175444 
172446 
172450 
175455 
172454 
175456 
172460 
172462 
172464 
172406 
172470 
175472 

{ILLEGAL FUNCTION CODES 

5405 

7415 

16453 

50437 

55443 

55447 

31455 

33465 

364 73 

i CONS TANTS*** ♦♦*♦*♦* 



177776 

177570 

17 7560 

177565 

177564 

17 7566 

50 

554 

175440 



PROCESSOR STATUS 
SUITCH REUISTIH 
in READER STATUS 
in READ HUH R 
TTt PUNCH STATU 1 . 
TTY PUNCH BUt-EH 
THRATION AMOUNT 
INTERRUPT VECTOM(RH) 
STARTING REGISTER ADDRESS 



c/n mo 


TM03-TJ 


lt> I'J// CM. 


I 


CZTFAK 


Pll 06 -APR 84 09 


54? 


1581 








1582 








158? 


000b 10 


000000 




1384 


000612 


000000 




1585 


000614 


000000 




I58t> 


000616 


000000 




158; 


000620 


000000 




1588 


000622 


oooooo 




1589 


000624 


000000 




1590 


000626 


oooooo 




1591 


000650 


oooooo 




1592 


000652 


oooooo 




159? 


000654 


oooooo 




1594 


000656 


oooooo 




1595 


000640 


oooooo 




159t> 


000642 


oooooo 




1597 


000644 


oooooo 




1598 


000646 


oooooo 




1399 


000650 


oooooo 




1400 


000652 


oooooo 




1401 


000654 


oooooo 




1402 


000656 


oooooo 




1405 


000660 


oooooo 




1404 


000662 


oooooo 




1405 


000664 


oooooo 




1406 


000666 


oooooo 




1407 


0006 70 


oooooo 




1408 


000672 


oooooo 




1409 


0006 74 


oooooo 




1410 


000676 


oooooo 




1411 


000/00 


oooooo 




1412 


000 702 


oooooo 




1413 


000 704 


oooooo 




1414 


000706 


oooooo 




1415 


000710 


oooooo 




1416 


000/12 


oooooo 




1417 


000714 


oooooo 




1418 


000 716 


oooooo 




1419 


000720 


oooooo 




14?0 


000/22 


oooooo 




1421 


000/24 


oooooo 




1422 


000726 


oooooo 




1423 


000730 


oooooo 




1424 


0007 52 


oooooo 




1425 


r 00154 


oooooo 




142o 


000/56 


oooooo 




142/ 


000/40 


oooooo 




1428 


000/42 


oooooo 




1429 


000/44 


oooooo 




14 30 


000/46 


oooooo 




1451 


000/50 


oooooo 




14 52 


000752 


oooooo 




14?*, 


000/54 


oooooo 




14 v* 


000/56 


oooooo 




14 «', 


000/f.O 


uouooc 




14 36 


000762 


oooooo 





-I / 
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{FLAGS AND COUNTERS********** 



SEG 0035 



TOB: 





TIB: 





HDRF'l 


.: 


FMAODR: 


DRVN 





TROO 





TR01 





TR02 





TR05 





TR04 





TR05 





TR06 





TR07 





TRIO 





TR11 





TR12 





TR15 





TR14 





TR15 





NRZOF t 


SLVN 





PFLG 





RTRN 





F.RAOC 


): 


TEMP] 


: 


temp; 


>i 


temp; 


*: 


ITCN" 


r: 


SAV1 





SAV2 





SAV5 





SCOl.f 


>: 


l'TRLF 


J ; o 


F.XM.. 





A1AF 





5L AF 





SSO 





FRRF 





ASF : 





SO': 





rHFF 





PLXH 


.: 


SIFL.t 


i: 


I TAOC 


); 


T24FI 


.: 


ADUf t 


: 


UlAM; 





y UN: 





DATC 





WIAU 





DA I At 


): 


RUA[) 





W2* i.i 


>: i ; 


DERM 


: 



1 



/ 



C/TLAl-.O 


tmo3 Tt.u», ru. 7 ;* crt i 


CZTtAL. 


Pll 06-APR-84 09:45 


14?; 


000 764 


000000 


14 58 


000/66 


000000 


1439 


000770 


000000 


1440 


000 7 72 


000000 


1441 


000774 


000000 


1442 


000776 


000000 


144? 


001000 


000006 


1444 


001003 


000000 


1445 


001004 


000000 


144o 


00100b 


000000 


144 7 


001010 


000000 


1448 


001012 


000000 


144') 


001014 


000000 


14 SO 


001016 


000005 


1451 


001020 


000000 


1452 






14 5? 






14*34 






1455 


00 10?.* 


000000 


1456 


001024 


000000 


1457 


001026 


000000 


1458 


001030 


000000 


1459 






1460 






1461 






146? 


001032 


000005 


1463 


001034 


000005 


1464 


001056 


000012 


1465 


001040 


000012 


1466 


001042 


000000 


146 7 


001044 


000017 


1468 


001046 


000017 


1469 


001050 


000017 


1470 


001052 


00001 / 


1471 


001054 


000000 



MACU1 



30(1046) 


06 Al 


PRtH.i 





SERF L : 





CRCNT: 





UOFS: 





WPCin.: 





PATRN: 





STATE; 





RORVK: 





RCDP: 





STATC: 





SL.VTtP: 


.WORD 


SKAT: 





PCNTR: 





JUMPFR: 


5 


NONSTD: 







;tXPT 


UCSl: 





WC52: 





WDS: 





WER: 







;C:ORF. 


WCOP?: 


5 




"1 

12 




12 







WCOPOj 


1 / 




17 




1/ 




1/ 








APR -84 09:48 PAGE 32-1 



SEQ 0034 







;»»8 INDICATES SLAVE TYPF. (0/1 - TE16/TU77) 

{PASS COUNTER 

j* INDICATOR FOR NON-STANDARD CONFIG. 

i »rt.AG FOR NON-STANDARD CONFIG. 



WRAP STATES******* 



:CORF DUMP PATTERNS******* 



,K 



C/It AtO 


THOA-TJ 


16- 1U// 


CZTEAL. 


PU Ob-APR-tf< 


14 :i 






14 M 






14 ". 






14 ;*> 


001056 


000000 


14/: 


001060 


000000 


1478 


00106? 


002736 


14 : r > 


001064 


002736 


1480 


001066 


00321? 


1481 


001070 


00321? 


148? 


0010.'? 


003416 


1483 


0010/4 


003420 


1484 


001076 


003600 


148S 


00 1 100 


003600 


1436 


00110? 


004202 


148 " 


001104 


004210 


1438 


001106 


004 37? 


14 89 


001110 


004 374 


1490 


00111? 


004506 


1491 


001114 


004510 


149? 


001116 


00462? 


1493 


001120 


004624 


1494 


00112? 


004 7*6 


149 r > 


001124 


004 750 


1496 


001126 


005172 


1497 


001150 


0051/4 


1498 


0011-5? 


005366 


1499 


001134 


005376 


1500 


001136 


0054 70 


1501 


001140 


005530 


150? 


00114? 


005600 


1505 


001144 


005640 


1504 


001146 


005710 


1505 


001150 


005750 


1506 


001152 


006022 


150 ; 


001154 


006062 


1508 


001156 


006134 


1509 


001160 


006150 


1510 


001162 


00C2 76 


1511 


001164 


006312 


151? 


001166 


00644? 


1513 


001170 


006456 


1514 


001172 


006566 


1515 


00 1 1 74 


00660? 


1516 


001176 


006716 


1517 


001?00 


006 73? 


1518 


00120? 


007?4? 


151^ 


001?04 


007250 


1520 


001206 


CO 7 3 74 


1521 


001210 


00/40? 


15?;> 


001212 


00 7*10 


15.M 


001214 


00/6 54 


1524 


001216 


007 726 


r» t j 5 


001220 


00 / /50 


I5?6 


001222 


010244 


15.?-' 


001224 


01025? 


1528 


001226 


0110/4 



C1{ I 
\ 09s45 
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(LOGIC TfcST F.NTRr TABLfc *+++ + + * + + + 

1ST TBI.: 



ill 

t.Tl 

IT? 

LT2 

L.T3 

LT5IT 

LT4 

t T4 

I i5 

L.T5IT 

L.T6 

L T6rT 

I.T7 

LT7IT 

I HO 

I T10IT 

LTU 

LT11IT 

L.T1? 

LT1211 

LT13 

ltijit 

L.T14 
LT14IT 
LT15 
I T15IT 

i r 16 

LT16IT 
LTW 
L.T17IT 
I T20 
LT20IT 
I T21 
LT21IT 
IT 22 
I T22IT 

l r?3 

I T23IT 
l.T?rt 

LT?4IT 
t T?5 
I T25TT 
1 . 1 26 
I 126 11 
I T?/ 
11?/ I I 
I T^O 
I 1 30 IT 
I Ml 
UMIT 
LT5? 



SbO 0035 



^ 



C/TLALO 


imo3- Tilt), w;: 


CZHAt , 


Pll 06 -APR- 8- 


15?9 


001230 


011110 


1550 


001232 


011252 


ISM 


001234 


011266 


1532 


001236 


011354 


1533 


001240 


011370 


1534 


001242 


011510 


1535 


001244 


011524 


1536 


001246 


01166? 


1537 


001250 


011676 


1538 


001252 


012002 


153°* 


001254 


012016 


1540 


001256 


012152 


1541 


001260 


012166 


1542 


001262 


012272 


1543 


001264 


012306 


1544 


001266 


012534 


1545 


001270 


01257? 


1546 


001272 


013064 


154 7 


001274 


01312? 


1548 


0012/6 


013330 


1549 


001300 


013356 


1550 


001302 


013576 


1551 


001304 


0136?4 


155? 


001306 


014042 


1553 


001310 


014070 


1554 


001312 


014304 


1555 


001314 


014320 


1556 


001316 


0144/4 


155* 


001320 


014510 


1558 


001322 


014650 


1559 


001324 


014664 


1560 


001326 


002622 


1561 


001330 


000051 


15b? 


001332 


000000 



\ 09:45 
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LT32IT 

L.T33 

LT33IT 

LT34 

1 T34U 

LI 35 

L.T35IT 

I T36 

L.T3Cn 

I.T37 

I.I37IT 

I T40 

L.T40IT 

l.Kl 

I 1411 T 

I.T42 

I.T42IT 

I.T43 

LT43I1 

I T44 

\ T44IT 

LT45 

LT451T 

LT46 

t T461T 

lta; 

LT47IT 
LT50 
I.T50IT 
LT51 
t T51IT 
TADX; .WORU 

11 AST- .WORD 



SfcQ 0036 



SCNTRLSi.WQRU 



51 
Q 



; CON I A IN'., it l* TfcST 
iXUN/xQKJ- HAG 



c/n At.o jnos-u it. U'/; en i 

CZTfcAtJMl 06 -APR 84 09;45 



I5t>4 
15t>5 
15h6 

1568 
1569 
1570 
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StQ 0037 



.EVEN 

; PROGRAM 



START AND HOUSEKEEPING* *♦♦♦♦*+* 



15 71 

15/2 
1573 

IS 74 
1575 
15/o 

157: 

1S78 

1580 

1581 
I 1) 
(1) 
CI) 
CI) 
(1) 
( 1) 

en 
en 

158? 
1585 
158m 
1585 
1586 
158 7 
1388 
1589 
15 SO 
1591 
159? 

1594 
1595 

159b 
1597 
1 598 
1 599 
1600 
1601 
160? 
160.* 
1604 
1605 
1606 

1 60 ; 

1608 
1609 
1610 
1611 



001534 
001340 
001344 
0C135O 
001356 
001362 
001370 
C01372 
001374 
0013/6 
001404 
001410 
001414 
001420 
001422 

001424 
001430 
001432 
001440 
001444 
001450 
001450 
001452 
001460 
0C146? 
001466 
001472 
001474 
001500 
001504 
001510 
001512 
001516 
001524 
001530 
001534 
00154 
001544 
001550 
001554 
001560 
001564 
001570 
001574 
001600 
001604 
001610 
001614 
001620 
001624 
001630 



012706 

013746 
013746 
012737 
005037 
0227 77 
00140? 
000404 
022626 
012737 
012637 
012637 
005037 
005027 
OCOOOO 

005737 

00140/ 
012737 
005237 
000137 

000240 
122737 
001005 
012704 
004 73 7 
000000 
012704 
004737 
005737 
001402 
00013 7 
112737 
012704 
004 737 
013703 
004 73 7 
012705 
012701 
012702 
012703 
004 1 3 7 
012704 
004737 
013703 
004737 
012 705 
012701 
01270? 
012/03 
004 737 



000500 
000004 
000006 
0013 74 
000006 
177777 



0001/6 
000006 
000004 
001012 



000042 

000176 
001422 
002246 



; NOTE- 
START 



000004 
17 7200 

000570 



000570 



PROGRAM 
MOV 
MOV 
MOV 
MOV 
CLR 
CMP 
BEQ 
BR 
CMP 
MOV 
MOV 
MOV 
CLR 
CLR 
CHNFLG j .WORD 

TST 
BEQ 

MOV 
INC 

JMP 



1$ 

2$ 
3$ 



020762 6$: 



000006 000041 

023546 
017760 



020762 
017760 
001422 

002246 
000043 
022/23 
017760 
000606 
020172 
000606 
000007 
176400 
172300 
017436 
022 745 
017 760 
000604 
020172 
000604 
000004 
000224 
000 ISO 
0174 36 



50*; 

SCHN: 
4*: 



5$: 



NOP 

CMPB 

HNE 

MOV 
JSR 
HALT 

MOV 

JSR 

TST 

BF.G 

JMP 

MOVB 

MOV 

JSR 

MOV 

JSR 

MOV 

MOV 

MOV 

MOV 

JSR 

MOV 

J C R 

MOV 

.JSR 

MOV 

MOV 

MOV 

MUV 

JSR 



STARTS HERE 
#500 ,SP 

a#4, -(SP) 

S*6. C5P) 

#i*,a#4 

SW6 

v - i , sswr 
2$ 

3* 

( SP ) » , ( SP ) ♦ 

OSWREG.SWR 

c sp ) ♦ , a#6 
cspv.a#4 

SKAT 

(PC)* 



a#42 

50$ 

#5UREG,SWR 

CHNFLG 

rsco 



#6, 3 #41 
5 J 

#MSG62 , R4 
PC, T TOUT 

#MSG1 ,R4 

PC, T TOUT 

CW'l.G 

6* 

I -j CD 

#'#,MSG1 

#M5G44 f R4 

PC. TTOUT 

REGS.R3 

PC.OCTP 

0REGS.R5 

#7,R1 

#1 76400 ,R2 

#1 72300 ,R5 

PC.1 TR 

#MSG45.R4 

PC. TTOUT 

VECf .R5 

PC.OCTP 

#VECT,R5 

#4,R1 

#224 ,M2 

#150,R3 

PC.TVR 



ON START AT 200 

iSET STACK POINTER 
SAVE ERROR TRAP VECTOR 
AND VECTOR »2 
NEW VECTOR 



SET 
AND 
USE 

IS 



SWITCH IE HARDWARE 



SOETWARE 
177777 

OTHERWISE USE HARDWARE SWR 
RESET STACK PTR 
SET SOETWARE SWITCH REGISTER 
RESTORE ERROR TRAP VECTORS 

CLEAR SKIP ADDRESS TEST FLAG 
;CLEAR CHAIN INDICATOR 
jCHAIN MODE INDICATOR 
j 1/0 - CHAIN/NOT CHAIN MODE 
; BRANCH IE IN DUMP MODE 

j INVOKE SOETWARE SWR 
{SET CHNFLG - CHAIN MODE 
5 G0 TO CHAIN ADDRESS 



{BRANCH IF NOT LOADED VIA TMDP 

{ADVISE USER TO REMOVE. TMDP FROM 
{UNIT UNDER TEST 



{PRINT TITLE 

{SEE IF IN CHAIN MODE 

{IF NOT : BR 

{ELSE GO TU START OF TESTS 

{DO NOT PRINT TITLE ON RESTART 

{REQUEST REGISTER ADDRESS 

{PRINT CURRENT ADDRESS 
{SET ADDRESS SAVE t OC 
;SET SIZE OF RESPONSE 
;SET UPPER LIMIT 
{SF T LOWER I IMI T 
;C0 GET RESPONSE 

{REQUEST VECTOR 

{PRINT CURRENT VECTOR 
{SET ADDRESS SAvt I DC 
{SET SIZE OF RESPONSE 
I SI T UPPER i TMIT 
j'U T i OWE R i TMIT 
j GO GET RESPONSE 



/ 



CiTTEAEO TM03-TE16 TU// CTL I 
CZTfcAfc.Pll 06-APR-84 09:45 



MACYll 30(1046) 06 -APR -64 09:48 



M 'S 

PAGE 34-1 



SEQ 0038 



161? 
161? 
1614 

1615 
1616 
1617 
1618 
1619 
1620 
1621 
1622 
1&23 
1624 
1625 
1626 
1627 
1628 
1629 
1630 
1631 
1632 
1633 
1634 
1635 
1636 
1637 
1638 
1639 
1640 
1641 
1642 
1643 
1644 
1645 
1646 
164 7 
1648 
1649 
1650 
1651 
1652 
1653 
1654 
16J5 
1656 
1657 
1658 
1659 
1660 
1661 
1662 
1663 
1664 
1665 
1666 
166 7 



001634 

001640 
001644 
001650 
001654 
001660 
001664 
001666 
00167? 
001674 
001676 
001702 
001706 
001710 
001712 
001714 
00172O 
001724 
001730 
001734 
001740 
001744 
001750 
001756 
001760 
001764 
001770 
001774 
002000 
002004 
002010 
002014 
002020 
002024 
002030 
002034 
002040 
002044 
002050 
002054 
002060 
002064 
002070 
002074 
002100 
002104 
002110 
002114 
002120 
002124 
002130 
002134 

002140 
002144 

002150 



013700 
012720 
012710 
013700 
012701 
012702 
010022 
062700 
005301 
001373 
012702 
012700 
005022 
005300 
001375 
012704 
004737 
012705 
012 7 03 
012701 
012702 
004737 
022737 
001002 
004737 
012704 
004 737 
013703 
004737 
012705 
012701 
012702 
012703 
004737 
012704 
004737 
013703 
004737 
012705 
012701 
012702 
C12703 
004737 
012704 
004737 
013703 
004 737 
012705 
012701 
012702 
012/03 
004 737 

012704 

004 73 7 
013703 



000604 
017246 
000340 
000606 
000016 
000510 

000002 



000610 
000077 



023356 
017760 
001016 
000000 
000002 
000004 
017436 
000002 

016670 
023340 

017760 
000620 
020172 
000620 
000002 
000007 
000000 
017436 
023517 
017760 
000660 
020172 
000660 
000002 
000007 
000000 
017436 
023313 
017760 
001006 
020172 
001006 
000002 
000001 
OGOOOO 
017436 

0236/2 

01 .'760 
001010 



MOV VECT.RO 

MOV 0MTINT,CRO)* 

MOV 0340, (RO) 

MOV REGS.RO 

MOV 016, Rl 

MOV 0C1.R2 

STO: MOV R0.CR2)* 

ADD 02, RO 

DEC Rl 

BNE STO 

MOV 0TOB.R2 

MOV 077.RO 

ST1: CL.R (R2)* 

DEC RO 

BNE ST1 

MOV 0MS57A.R4 

JSR PC.TTOUT 

MOV JUMPER, R5 

MOV 00, R3 

MOV 02, Rl 

MOV 04, R2 

JSR PC.TTR 

001016 CMP 02, JUMPER 

BNE 1$ 

JSR PC.NOST 

l$i MOV 0MSG57,R4 

JSR PC.TTQUT 

MOV DRVN.R3 

JSR PC.OCTP 

MOV 0DRVN.R5 

MOV 02, Rl 

MOV 07, R2 

MOV 00, R3 

JSR PC.TTR 

MOV 0MSG58.R4 

JSR PC, "I TOUT 

MOV SLVN.R3 

JSR PC.OCTP 

MOV 0SLVN.R5 

MOV 02, Rl 

MOV 7, R2 

MOV 00, R 3 

JSR PC,Ttr 

MOV 0MSG56.R4 

JSR PC, T TOUT 

MOV MATC.R3 

JSR PC.UCTP 

MOV 0STATC.R5 

MOV 02, Rl 

MOV 01.H2 

MOV 00, R3 

JSR PC.TTR 

MOV 0MSG6 7 , R4 

JSR PC. HOLM 

MOV SLVTYP.R3 



{GET VECTOR 

5L0AD INTERRUPT ADDRESS IN VECTOR 

;LOAD PRIORITY 

(GET START OF REGS 

I SET NUMBER OF REGS 

{GET START OF TABLE 

jBUILD TABLE 

j BUMP ADDRESS 

; SEE IF DONE 

{IF NOT; 3R 



{CLEAR FLAGS ► COUNTERS 



f REQUEST IF JUMPER IS IN NON-STANDARD MODE 



j ♦LIMIT RESPONSE 

j*SET CHAR. NUMBER TO 1 

{♦SET RANGE - 4 

{♦GET RESPONSE 

{TEST FOR NON-STANDARD JUMPER. 



{GO TO MODIFY SCHEDLAR 
{REQUEST TM03 DRIVE 



{GET CURRENT DRIVE 
{PRINT IT 

:TTR ROUTINE RETURNS 
{LIMIT RESPONSE 
{LIMIT RANGE TO 0-7 

;GET USFR RESPONSE 

{REQUEST TE16 SLAVE < 



{GET CURRENT SLAVE 

{AND PRINT IT 

jTTR ROUTINE RETURNS RESPONSE 

{LIMIT RESONSE TO 1 CHARACTER 

{BETWEEN AND 7 

{GET USER RESPONSE 

{REQUEST STATIC ONLY 
{GET CURRENT VALUE 
TYPE IT 



USER VALUE TO (R5) 



TO (R5) 



{AND 
;SET 
{SET 
{SET 
{SET 
{GET 



ADDRESS O r STATIC FLAG 
SIZE OF RESPONSE 
UPPER LIMIT 
LOWER LIMIT 
RESPONSE 



{♦♦H Rt QUEST SLAV* T 1 PI 'IE lb UR TV/"*' 
l**tt GET CURRENT SLAVE TYPE 



N3 



C/TLAKO 


TM03-TL16/IU/: 


CTL 1 


MACYll 


30(1046) 


06- 


APR -84 09.-48 PAGE 34 -2 


CZTEAE. 


Pll 06 -APR 84 


09:45 












1668 


002154 


004/3 7 


020172 






JSR 


PC.OCTP 


♦ «B TYPE CURRENT VALUE 


166^ 


002160 


012705 


001010 






MOV 


ttSl.VTYP,R5 


»*B GET ADDRESS OF SLVTYP 


1670 


002164 


012701 


000002 






MOV 


<>2,R1 


♦♦B SET SIZE OF RESPONSE 


lb71 


002170 


01.2/02 


000001 






MOV 


01. R2 


♦♦B SET UPPER LIMIT 


1672 


002174 


012703 


000000 






MOV 


#0,R3 


► ♦B SET LOWER LIMIT 


1673 


002200 


004737 


017436 






JSR 


PC.TTR 


♦*B GET RESPONSE 


16 74 


002204 


005737 


001010 






TST 


SLVTYP 


IS IT A TU/7 


16 75 


002210 


001406 








BEQ 


ST2 


BRANCH IF NOT 


1676 


002212 


012737 


116741 


006020 




MOV 


#116741. STWD16 


SET UP TEST WORD FOR TEST 


1677 

16 78 


002220 


012737 


110741 


006132 




MOV 


^110741, STWD17 


SET UP TEST WORD FOR TEST 


lt?» 

1680 










; START 


210 






1681 


002226 


012706 


000500 




ST2: 


MOV 


it jOO . SP 


SET STACK PTR 


168? 


00223? 


00503 7 


00) JO? 






CLR 


RDRVF 


CLEAR REVERSE » LAG 


lo8* 


002236 


00503 ? 


00i014 






CL r 


PCNTR 


CLEAR PASS COUNTER 


1684 


002242 


004737 


020620 






JSR 


PC.GTSWR 


GET SWITCHES 



SbQ 0039 



FLAG 



16 
17 



CZTl.AEO 1N05 

czte.ae ,pu 



lt^6 
1M*7 
1688 
168^ 
16^0 
1691 
16*2 
1^3 
16^4 
16*5 
16S* 

169: 

It^8 
16^ 
1 VO 
P 



Tt U> It? 

06 -APR 



84 09 j 45 



MACU1 3011046) 06 APR -04 09;4H 



PAW 



V 

V 1 

c 1 

v 1 
( 1 

C i 

( 1 
I 1 
CI 

( 1 
l 1 

CI 

CI 
CI 
C 1 

( 1 

C 1 

V 1 
k 1 
' 1 

C 1 
C 1 

( 1 
:?o 

170 
170 
WO 



1706 

1 70 7 

1708 
1/0^ 
1710 

1M1 

1 71.' 
IMS 
1 M< 
1 MS 



002246 

002254 
002260 
00226? 
002270 

0022 7^ 
002300 
002504 
002510 
002314 
002320 

002326 

002336 
002344 
002352 
002356 
002364 
002366 
002374 
002400 
002406 
002410 
002414 
002416 
002422 
002424 
002432 
002434 
002440 
002446 
002450 
002456 
C02464 
002466 
0024/4 
002502 
002510 
002516 
002522 
002526 
002530 
002536 
002540 
00?54? 
00? 54 6 
002552 
002554 
002560 
O0? r .64 
00, S66 
0025 74 



0527 7 7 
005737 
001407 
032 73 7 
001403 
012737 
005037 
00*037 
017 700 
042700 
001122 
005 73 7 
001457 
012737 
012737 
012777 
005237 
022737 
001521 
013777 
005777 
032777 
001356 
005237 
001011 
005737 
001006 
122757 

001002 
0052 3 7 
022 737 
001733 
013^77 
032777 
001751 
012737 
062737 
013737 
062737 
CO503 7 
017700 
000110 
0327 7? 
001403 
OOOOOO 
00503 7 
005 737 
001 750 
017 700 
04? 700 
0016*0 
Oh' 73' 
02*700 



000100 
00004? 

000004 

000001 
0007 74 
000 734 
1 76254 

1 / 7 700 

001422 

177777 
177777 
000040 
000620 
000010 

000620 

176110 
010000 

000660 

00062C 

000006 

000660 
0000'. 

000660 
002000 

001056 
000004 
000 736 
000002 
000614 
176210 



000 7/4 
000 7 34 

176010 
1 7 7 700 

GOl-'OOl 
00 1 3 30 



SF-Ci 0040 



176316 TSCD 



1 7?4m% 
001010 



000b?U 
000660 
176146 

000020 

176124 

W61 12 



000 7 36 
000 7 36 
000710 
000710 



1*5 



NX T DRV; 
1*1 



NXTbLVi 



00004 1 



000660 1 $ s 

1 76064 
1 7605? 



TSCDA 

T5CD0 
TSCD1 



002000 17605? TSCD?! 



rscn3; 



000 7 34 ST', CD ; 



I T| S f SCHEDUl AR*«******** 



HIS 

TST 

bed 

BIT 
BEQ 
MOV 
ClR 
CLR 
MOV 
BIC 
BNF 
TST 
BEQ 
MOV 
MOV 
MOV 
INC 
CMP 

BfcQ 

MOV 

TST 

BIT 

BNL 

INC 

BNE 

TST 

BNE 

CMPB 

UN*. 

INC 

CMP 

bfo 

MOV 

BIT 

BEQ 

MOV 

ADD 

MOV 

ADD 

CI R 

MOV 

JMP 

BIT 

BEU 

HAl T 

ClN 

T'.T 

bfu 

MO" 

BIC 
HI iJ 

Ml iv 
CMP 



0100, U T KS 
S04? 

1$ 

04.W01 7?466 

1$ 

01 ,51 VTYP 

WPGR. 

ST* I Ci 

U5UR.R0 

9\ 7 7 700.RO 

ST SCO 

CHNH(i 

T5C0A 

o I.DRVN 

i.SLVN 
040, UCS 
DRVN 
010, DRVN 
iDONE 
DRvN.tfCS 
SCI 

oioooo, acs 

H 

St.VN 

DRVN 
1$ 

06,oJ04 1 
IS 

SI VN 

010. SI VN 
NXTORV 
SI VN.oJTC 
02000 . b)0 T 
NX T SI V 

OTSTIdl .1 TAOD 
04,1 TADD 

1 TADD, ITRl.P 
0?. ITPi P 
HDRf I. 

81 TADD.RO 
(R0> 

0?OO0.o)SwR 
T 1 -C()3 

UPl.F 1 
STH i, 

iscno 

blSWR.RO 

01 7 7 700, Hi) 

iscn 

1 , ' , 1 i I I . 
Tl AST, HO 



jSET KEYBOARD INTERRUPT f.NABI fc 
» ACT MODE ? 
I BRANCH IF NOT 



CI. FAR WRAP PATRN F'l.Ali 
C\ FAR SINfil E TFST Ft.Ati 



BRANCH IF SINGLE 
FST SELECTED 

BRANCH IF NOT IN 



CHAIN MODE 



INITIALIZE DRIVF o 

INITIALIZE SLAVE. 

INIT CONTROLLER 

STEP DRIVE tf 

EXIT If ALL DRIVES TESTED 

FOR AVAILABILITY 

LOAD DRIVE 

ACCESS DRIVF 

BRANCH IF DRlVi NON Fx 1ST ANT 

(NED • 1) 

STEP bl AVF AND BRANCH 

IF NOT SLAVE 

BRANCH IF NOT DRIVE 

BRANCH IF NOT TM11P 

STEP TO St AVI 1 

BRANCH IF All SLAVES TESTFD 

F OP AVAIL ABU IT » 
I UAD SI AVF UNI T 
FiRANCH V SI AVE NOT 
PRESFNT CSPR 0) 



|SE T I TFHAT ION ADDRF SS 
iCL.l AR PRINT HEADER H AC, 



t SF T POINUR 
iGO TO TEST 
I SEE IF HAl T 

j IF NOT: BR 



TO U ST 
ON TEST 



»ClFAR WRAP DATA LiFNFRAUR i { Al, 
I St 1» SINUE TlsT 
I IF NOT : MM 

, BRANCH IF Ml I US Is DEsIRt [) 

|I» SHj HH 

I st : MNia t M v ? F i >u- 

jSM U FXCUDLD Tfc^Is 



C'Tt.Al.O !M05 
CJTt At .EM I 



n id u» 

06 APR 



"7 Cll 1 
84 09 5 45 



MACUl 3011046) 0*, APR -84 r ^{48 PAGE 35 1 



SP.Q 0041 



1*1* 

1 \V 

t.Vi 
i :vo 
1 .v?. 

1V4 

i /or* 
i \> 
1 v 
i r;:8 

170* 
l-'30 

l.'Sl 

1 730 

1 757. 

r'54 

en 
en 
en 
tn 
en 
en 
in 

1735 
1 '36 
1/3* 
1736 
1?3^ 
174c 
1741 
174? 
1743 
1"44 
1 '45 
1 74 f, 
1/4 7 
1 748 
1 749 
17SQ 
1751 
1 ?50 
W53 
1 754 
1 755 
1 756 
1757 
1758 
1 /V* 
1 760 
WM 
1 760 
W65 
1 764 
1 -'6'j 
1 7».6 
1/6 7 



000600 
000600 

000*04 
000606 
000614 
000*00 
0006?? 
000606 
000630 
000634 
000640 
000644 
000650 

000650 
000654 

000656 
000660 
000664 
000666 
000670 
0006 70 
000674 
0006 76 
000700 
000 704 
000706 
000714 
00071b 
000 700 
000 706 
000730 



000 7 36 
000744 
000 750 
000756 
000760 
000 764 
000 770 
000 7 ?2 
003000 
003000 
005006 
003010 
003016 
003000 
003006 
00 503? 
00 50 56 
00 504? 
005046 
005050 
00 5054 
005056 
003060 



000410 
006300 

006100 
010 737 
06003 7 
000730 
005 73 7 
001070 
010704 
004 737 
013 703 
004 737 
005000 
005300 
001376 
013700 
001405 
000005 
004710 
000040 
000040 
000040 
000040 
005757 
001005 
030777 
001401 
000000 
010737 
00503 7 
000137 



010757 
013737 
013701 
005757 
001403 
005737 
001506 
030777 
001430 
010704 
004737 
010704 
004 757 
010705 
010701 
010 700 
010703 

004 73 7 

005 75 7 
00] 4 55 
005001 
01? 700 
010/7/ 



001056 
000736 

001400 

000563 

017760 
001014 
000170 



000040 



000 736 



175654 
001010 



000616 
0006 74 



001400 
010000 



000001 
001014 
000046 



004010 
000600 
000600 
001010 

0007^4 



001000 175570 

0010?6 
01 7000 
001165 
017760 
0006 74 
00000? 
00000 7 
000000 
01 74 36 
0006 70 



000010 
000040 



I 754 50 





m t 


It NO 




ASI 


RO 




ROl 


RO 




MOV 


OTSTTBi-.LTADO 




ADO 


RO,l TAOD 




BR 


TSCDi 


UNO: 


TST 


CHNFLG 




BNE 


NXTSLV 


SDONfc: 


MOV 


0MSG41,R4 




JSR 


PC.TTOUT 




MOV 


PCNTR.R3 




JSR 


PC.OCTP 




OR 


RO 


1$: 


DLC 


RO 




BNE 


1* 




MOV 


Q040.RO 




BEQ 


HERE 




RESET 




St'NDADt 


JSR 
NOP 
NOP 
NOP 


PC.CRO) 


HERE: 


NOP 






TST 


CHNH.G 




bnf; 


TENOX 




BIT 


010000 ,NSWR 




Bid 


TENDX 




HAl T 




TENDX? 


MOV 


01, SKAT 




INC 


PCNTR 




JMP 


TSCD 




(LOGIC 


TEST 1: DRlVf 


LTl: 


MOV 


0MSLT1.EMAUDR 




MOV 


DRVN, TEMP 3 




MOV 


0RVN.R1 




TST 


SKAT 




BEQ 


1* 




TST 


5TK li 




BEU 


I T1X 


11: 


BIT 


01000.SSWR 




BEQ 


i r i a 


1 TUiO: 


MOV 


<?MSG?A,R4 




JSR 


PC. INS 1 


LUG: 


MOV 


OM5G0.R4 




JSR 


PC, 1 TOUT 




MOV 


on MM5.R5 




M'JV 


0?,R1 




MOV 


tf/,H? 




MOV 


0O.M* 




JSR 


PC, TTR 




TST 


H MPi 




BtU 


I I IX 




CI R 


Ri 




MOV 


<>10 ,R0 


I T I A : 


MOV 


04O,UC , J 



I IF SO: BR 

(SET TABLE MODIFIER 

tSET TEST POINTER 

(BRANCH If IN CHAIN MODE 
I STEP TO NEXT SLAVE 

j PRINT END Of PASS 

(PRINT PASS NUMBER 
(DELAY WAITING FOR 



jGET ACTU RETURN ADORES^ 
j BRANCH IF NOT ACT 11 



(BRANCH IF IN CHAIN MODE 

j SEE IE HAl T ON PASS 
I IF NOT: BR 

(SET SKIP ADDRESS TEST El. AG 
iBUMP PASS COUNTER 
j RE ST ART 



i»»B SET ERROR MSG HOR ADDRESS 
iGET DRIVE t> TO BE TESTED 

(SEE IE SKIP ADDRESS TFSTS 

( V NOT; BR 

I SEE I* SINGIE TEST 

»IE NOT: BR 

, BRANCH V MAN INTERVENTION 
(NOT SELECTED 

iPRINT TEST INSTRUCTIONS 

l RE QUE S! DRIVt NUMBER 

l TTR ROUTINE RETURNS RESPONSE TO iH^ 



(Uf 1 URtVE NUMEU R 

l SEE l» ANOTHER DRUf 

I If NOT; BR 

|M I tCT DRlvl 

I'A T NUMBER OE DRIVES 

{ INI r 



CYTt >\i 1M03 
CJTt At .PI I 



u 16 iL'/: cu i 

06 APR M 0^:45 



17*8 

1 ' ,V 
i'U 
17 V 

17 7 J 
1 '"4 

l r 75 

r;: 

1 "8 

1 ■: ^ 

1780 
1*81 
1 '82 
176? 
1"*84 
I 785 
K6b 
1787 

1^88 
1 7«9 
1790 
170X 



0050 70 
005074 
005100 
005106 
005110 
005116 
005120 
005124 
005126 
005150 
005154 
00515b 
005140 
00514c 
005144 
005146 
005154 
00 31 So 
00516'* 
00517c? 
00 3200 
00 VO'. 
003206 



01017 7 
00577 7 
05277/ 
001010 
05277 7 
001455 
025701 
001404 
000407 
023701 
001410 
005500 
001724 
005201 
000746 
01 2*737 
CJC405 

c: y/;7 
oi.r/37 

01275/ 
i.>OA 7:.w* 
'.)•>'> 754 
OvOlS.' 



175424 
175410 
01 0000 

001000 

000674 

000b 74 



VI 
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1/5412 
175452 



000001 000/12 



000002 
0213 r 5 
003062 
015230 

002530 



000712 
0006*6 
000 706 





MOV 


R1.WC5 




1ST 


SCI 




Bit 


oioooo.acs 




HNfc 


l T ID 




BIT 


nooo, oswr 




BEU 


L.T1X 




CMP 


TFMP3.R1 




BEQ 


L-T1C 




BR 


LT1F.H 


1 TIB: 


CMP 


TEMP5.RI 




BEQ 


I. TIER I 


LTIC: 


DEC 


RO 




BL'Q 


i tig 




INC 


Rl 




BR 


LT1A 


I TIER: 


MOV 


Ol.EXFL 




BR 


LT1FR2 


I TlERli 


MOV 


02,exfl 


LT1ER2: 


MOV 


*MSG3 ( FRAD0 




MOV 


0L.T1A.SC0LP 




JSR 


PC.LTGER 




BR 


L TIC 


LUX; 


JMP 


TSC02 



SEQ 004^ 



iStlbCT 

I ACCESS 
{SEE IF 
I IF SO: 
j BRANCH 



DRIVE 
DRIVE 

NED 

BR 

IF NOT 



MANUAI INTERVENTION 



I SEE IF SHOULD Bt NED 
I IF NOT: BR 
(ELSE GO TO ERROR 
j SEE IF SHOULD BE NED 



j IF DONE Al L : BR 
j SELECT NEXT DRIVE 

j CONTINUE 
(FLAG EXPT 

(FLAG NOT FXPT 

jFLAG CONDITION 

i SET SCOPE ADDRESS 

I<i0 PRINT l OGIC TEST E RROR 

{CONTINUE TEST 

I RETURN TO SCHED 



.. A 



C/HAtO I MO 3 
C/TEAE.Pll 



06 APR 



V CM I 
84 09;45 



MACU1 30(1046) Ob APR 80 09j4tt PACIC 3fi 



1 »5 

A 794 
1 ?OS 

179 7 
1 T9« 

1 >i ' 
1800 

leoi 

180? 

1803 

1304 

180b 

1806 

130 

1808 

180^ 

1810 

181i 

1812 

1815 
1814 
1815 
1816 
1817 
1818 
181° 
1820 

1821 

182? 
1823 
1824 
1825 
1826 
5. 8 2".* 
1828 
1829 



00321? 
003214 
O0:.222 
003230 
003236 
00324? 
003246 
003252 
003254 
C03256 
00;' 26 4 
003266 
003272 
003300 
003302 
003306 
00*310 
003312 
005314 

003316 
005524 
003332 
003354 
003342 
003350 
00:;352 
003360 
003366 
003 3 74 
0C5«»00 
00340? 
003404 
005406 
00541^ 



000240 
012 7 77 
013777 
012737 
012705 
012700 
012702 
011501 
011112 
032777 
001402 
004 73 7 
032777 
001402 
004 737 
022225 
005300 
001357 
000434 

012737 

012737 
000415 
012737 
0127 5 7 
000406 
012737 
012737 
012757 

004 73 7 
00020 7 

005 726 
000722 
004 73 7 
000137 



000040 
000620 
024066 
000510 
000016 
0C0622 



003516 
000002 

003334 



000002 
021377 

000002 
021415 

000001 
021377 
003402 
015230 



016b00 
002530 



3EQ 004 3 



1752 76 
1 752 70 
000616 



020000 175224 



175224 



000712 
000666 

000712 
000666 

000 71? 
000666 
000706 



I T2: 
1-F2IT: 



LT2A: 

LT2B: 
LT2C: 

LT2ER1 

LT2ER2 

LT2ER3 
LT2ERG 

I.T21.P: 

LT2X: 



jl.OGIC TEST 2s REGISTER ADDRESSING********** 



NOP 

mov 040, ac; 

MOV DRVN.SCS 

MOV 0MSLT2.EMADDR 

MOV 0C1.R5 

MOV 016.R0 

MOV OTR00,R2 

MOV CR5).R1 

MOV (R1),(R2) 

BIT 020000, aci 

OEQ LT2B 

JSR PC.LT2ER1 

BIT *2,SER 

BEQ LT2C 

JSR PC.LT2ER? 

CMP CR2)*,(R5)» 

DEC RO 

BNE LT2A 

BR L.T2X 

MOV 02.EXFL 

MOV 0MSG4.ERADD 

BR LT2ERG 

MOV 02.EXFL 

MOV 0MSG5.ERADD 

BR LT2ERG 

MOV 01,EXFL 

MOV GMSG4.ERADD 

MOV 0LT2LP.SC0LP 

JSR PC.L.TGEW 

RTS PC 

TST CSP)* 

BR LT2A 

JSR PC. ITER 

JMP T5CD2 



INIT 

SELECT DRIVE 

SAVE LT2 HEADER 



ADDRESS 



SET ADDRESS Of FIRST REGISTER 

SET NUMBER 0*" REGISTERS 

SET START OF REGISTER BUFFER 

READ REGISTER 

SEE IF ERROR 

IF NOT; BR 

ELSE GO TO ERROR 1 

SEE IF ILR 

IF NOT; BR 

ELSE GO TO ERROR 2 

BUMP ADDRESS 

CONTINUE FOR ALL REGISTERS 



FLAG NOT EXPECTED 
POINT TO CONTROL!. F.R ERROR 
GO TO ERROR 
FLAG NOT EXPECTED 
POINT TO DRIVE ERROR 
GO TO ERROR 
FLAG EXPECTED 
POINT TO DRIVE 
SET SCOPE ADDRESS 
GO PRINT 
El St CONTINUE 
RESET STACK 
LOOP 

GO SI F IF m RATIONS 
; RE TURN TO SCHLD 



I- /\ 



C'Tt-.-U 


1N03 U \t> 1U *.' 


CM. I 


MACU1 


30(1046) 


06 APR 


84 04:48 PAGh 


3 7 


C/TEAE. 


PI i Ob -APR -84 


09:45 












1851 
1832 
1833 












j LOGIC 


TEST 3} CONTROL 


BUS********** 


005416 


000240 






I T3: 


NOP 






18M 


00 54/0 


012^3? 


024145 


000616 


I T3IT: 


MOV 


0MSLT3.EMADDR 


I SET TEST HEADER 


1835 


00442b 


012701 


000001 






MOV 


01. Rl 


{PRESET PATTERN 1 


1356 


0034 V 


012700 


000020 






MOV 


020. RO 


{SET PATTERN CHANGE NUMBER 


1837 


0034sb 


004737 


016726 




LT3A; 


JSR 


PC.INIT1 


jGO INIT 


\{<?S 


00344.? 


old 77 


175050 






MOV 


Rl.BFC 


i WRITE TO F'C 


1859 


00'54 1o 


052777 


000010 


175050 




BIT 


oio.atR 


{SEE IF CPAR (TM03) 


1M0 


oo:s-": c v* 


001012 








BNE 


LT3ER1 


i IF SO: BR 


184 1 


0054': b 


017702 


175034 




LT3B: 


MOV 


SFC.R2 


{READ FC 


134.? 


CO.i4o2 


0527 77 


020000 


175020 




BIT 


020000, SCI 


{SEE IF MCPE CRH) 


134/ 


0034 "'O 


UOIOW 








BNE 


LT3ER2 


j IF SO: BR 


1*144 


0054 / ?. 


005300 






LT3C: 


DEC 


RO 


{SEE IF DONE PATTERN CHANGES 


?*45 


00^/4 


001426 








BEQ 


LT3X 


{IF SO: BR 


184 o 


0C34 76 


006501 








A5L 


Rl 


{CHANGE PATTERN 


164 7 


00/500 


000756 








bR 


LT3A 


{CONTINUE 


1348 


00* SO.- 1 


012737 


021730 


000666 


LT3ER1: 


MOV 


0M5G11 .ERADD 


{SET ERROR CODE 


1849 


00 35 JO 


012737 


003436 


000706 




MOV 


0L.T3A.SC0LP 


»SET SCOPE ADDRESS 


1850 


CO i, j 16 


01/702 


174774 






MOV 


QFC.R2 


;GET DATA 


1351 


OQ5522 


004 73 7 


016336 






JSR 


PC.LTGER1 


{GO DO ERROR 


1852 


oo;->b?fi 


000 753 








BR 


LT3B 




1855 


005350 


012737 


021704 


000666 


LT3ER2: 


MOV 


OMSG10.ERADD 


{SET ERROR CODE 


1854 


00 5! > 5b 


012737 


003456 


000706 




MOV 


0LT3B.3C0LP 


{SET SCOPE ADDRESS 


1855 


003544 


004737 


016336 






JSR 


PC.LTGER1 


{GO DO ERROR 


1856 


OOVSSQ 


000750 








BR 


LT3C 




1857 


00 r o52 


105701 






L.T3X; 


TSTB 


Rl 


{SEE IF DONE PATTERN 2 


1858 


0035:v4 


100405 








BMI 


LT3XX 


{IF SO: BR 


1859 


GOT'iM'i 


012701 


000401 






MOV 


0401.R1 


{SET PATTERN 2 


I860 


0O.S562 


01^700 


000010 






MOV 


010. RO 


iSET PATTERN CHANGE NUMBER 


186i 


OC3';o6 


000723 








BR 


LT3A 


jDO PATTERN 2 


136/ 


oo.-.s.o 


004.* 3 7 


016600 




LT3XX: 


JSR 


PC .HER 


{GO SEE IF ITERATIONS 


1865 


003574 


000137 


002530 






JMP 


TSC02 


{RETURN TO SCHEDULAR 



SEQ 0044 



C/Tr At 


U'03 Tt 


IU 1 U ( I 


CI I. 1 


MACUl 


30(1046) 


06 APR 


-84 09:48 


CZTE.AE, 


Pll 06 APR -84 


09:45 










18*5 

186t> 












j LOGIC 


TF.ST 4: SLAV 


18^ ; 
















1S6S 


003600 


0)3737 


000660 


000674 


LT4: 


MOV 


SLVN.T..MP3 


18o<* 


003606 


013701 


000660 






MOV 


5LVN.R1 


1870 


003612 


005737 


001012 






rsi 


SKAT 


16 71 


003616 


'•01403 








BEQ 


1$ 


187*? 


003*00 


005757 


000734 






T5T 


STFLG 


1875 


003624 


O-01564 








BEQ 


1 T4X 


18 74 


003626 


052777 


001000 


174734 


Hi 


BIT 


01000, sswr 


1875 


003634 


i'f'1430 








BEQ 


LT4A 


1876 


003636 


1-12704 


021533 




LT4G0: 


MOV 


0MSG8A.R4 


1877 


00364 c"? 


004 7 37 


017200 






JSR 


PC, INST 


18 78 


003646 


012704 


021472 




LT4G? 


MOV 


0MSG8.R4 


1879 


00365c? 


001757 


017760 






JSR 


PC.TTOUT 


1880 


003656 


: 12 705 


0006 74 






MOV 


OTEMP3.R5 


1881 


003662 


012701 


000002 






MOV 


02.R1 


1802 


003666 


J 2/02 


000007 






MOV 


07, R2 


i885 


00367? 


-12 '03 


000000 






MOV 


00, R3 


1884 


003676 


004/37 


017436 






JSR 


PC.TTR 


1885 


00370J 


w05/37 


000670 






TST 


TEMPI 


1886 


003706 


*.\>1533 








BEQ 


LT4X 


1887 


003710 


005001 








CLR 


Rl 


1888 


003712 


012/00 


000010 






MOV 


010, RO 


1889 


00371.6 


• Uj/77 


000040 


174574 


LT4A; 


MOV 


040, acs 


1890 


003724 


OIH777 


000620 


174566 




MOV 


DRVN.oJCS 


1891 


003 732 


Oi017 7 


174604 






MOV 


R1.3TC 


189^ 


003756 


Or; 703 


174574 






MOV 


aor.R5 


1893 


00j742 


02013'? 


000674 






CMP 


R1.TEMP3 


1894 


003 74b 


'M>1404 








BEQ 


L.T4B 


1895 


003 7 SO 


< 1 V' , 703 


002000 






BIT 


02000. R5 


3 896 


003754 


001461 








HEQ 


L.T4D 


1897 


0037'Vj 


..00464 








BR 


LT4ER1 


1898 


003760 


Or 2 703 


002000 




LT4R; 


BIT 


02000. R3 


1899 


003 704 


'.-01465 








BEQ 


LT4LR2 


1900 


005/66 


012704 


023642 




LT4C: 


MOV 


0MSG64 , R4 


1901 


00377.-' 


o::4 737 


017760 






vJSR 


PC.TTOUT 


1 L K>2 


0017/6 


l :■: 702 


000001 






MOV 


01, R2 


1903 


00400? 


012. '04 


023660 






MOV 


OMSG65.R4 


190C 


004006 


OV27 7 7 


142054 


174522 




CMP 


142054 ,»0T 


1905 


0C401.4 


<vo n, 








BEQ 


1$ 


1 906 


0040 if, 


i-i..'.'04 


023665 






MOV 


0MSG66.R4 


J 90 7 


004,.; t \-.' 


JO 5*02 








DEC 


H2 


1908 


004 °20 


'-22 f* 7 7 


142051 


174504 




CMP 


0142051, aDT 


1909 


004032 


i -01403 








BEQ 


IS 


1S10 


0040 54 


f 105*02 








DFC 


R2 


1911 


004 03n 


012 704 


024002 






MOV 


0N5U6'*,R4 


vn? 


004042 


o'jfl ! yi 


01/ 760 




15: 


JSR 


PC, TTOUT 


191* 


o::4046 


- 2-J237 


001010 






CMP 


R2.SI vTiP 


19]4 


0040 j 2 


001406 








BEQ 


4$ 


191', 


004054 


12 704 


023/30 






MOV 


0M5G68.R4 


1916 


004060 


004 7 3 / 


01/760 






JSR 


PC, T TOl.iT 


191 ' 


004064 


000 1 5 7 


002622 






JMP 


n no 


191?. 


i>04i')/0 


12/04 


022405 




4$: 


MOV 


0M5(HO,R4 


I'* 1 * 


O04l, /■■* 


''.,475: 


01 7/60 






J'.R 


PC. I TOUT 


19^0 


004100 


01 7 /OS 


1 74454 






MOV 


ttSN»RS 



1)4 

PAGE 38 

E ADDRESSING********** 



{SEE: IF SKIP ADDRESS TESTS 

l IF NOT: BR 

j SEE IE SINGLE TEST 

j IF NOT: BR 

t BRANCH IK MAN INTERVETION 

{NOT SELECTED 

{PRINT TEST INSTRUCTIONS 

{REQUEST SLAVE 



1 GET SLAVE NUMBER 

{SEE IF SLAVE 

1 IF NOT: BR 

s SELECT SLAVE 

{SET NUMBER OF SLAVES 



SfcQ 0045 



jINIT 
{SELECT 
{SELECT 
{GET OT 
{SEE IF 
:IF SO: 



DRIVE 
SLAVE 



SHOULD HAVE SPR 

BR 

iStE If SPR 
{IF NOT: BR 
{GO TO ERROR 1 
{SEE V NO SLAVE PRESENT 
j(SPR =0 1 
jTtPE ' SLAVE T1PF ■ ' 

{PRESET SLAVE MPt 1U77 

jSE 1' UP TO nPE ' TU/7' 
{BRANCH IF TU/7 

{CHANGE SLAVE HPE TO ' TUb' 
{CHANGE SLAVE TiPK TO TE16 
{BRANCH IF TE16 

jCHENGE SI AVE TtPE TO II I \ lirtl 

I riPe SLAVE TtPE t TU77, TE.lt,. OR 111 LOAD 

{BRANCH IF HARDWARl SI AVt T 1 PI 15 THL 

{SAME AS USER SPAC H IK) SI AVt T iPE 

j.*H UPt 'INCORRECT SI AVE T1PL' 

i »*tl 

1 ► »B EXIT TEST 

{PRINT SERIAL NUMBER 1AG 



cn\ At o imo;< 

CZTF.AF,P1l 



Of. -APR 



'.* cn. i 

84 09; 45 



1*V1 
19.Y* 
10 J? 
K04 
1<V?S 

lvj; 

1950 
1931 
19;'C 

193? 
19/. J 
19 Vi 

1 *<b 
1^37 



004 i CM 

0041 10 
004 Uh 

O04i.;?o 

004 1*\? 
004 1JU 
004 1 ,"'b 
004 3 Mi 
004 1 <A 
004 i Co 
004). ";b 
0041'w 
004 1 tV 
004170 

00417b 



v04".'5 7 

OV/7 7 

00 1 4.?/ 

COS 300 

001*51 

OGV01 

0006/ 3 

0'.;:737 

OO0403 
• » i >■»<■/ 

o:^.'3. 7 
o:.t;37 

01.^/37 
iiO-l '37 
i.oO."il 
000137 



020Mb 
001000 



000002 
024232 

021662 
003716 
015230 

002530 



MACU1 30(1046) 06 APR -84 09; 48 



PAGE 3R 1 



1 Z4452 



00071c? 
000b lb 
00066b 
000706 



LT4D: 



000001 000712 LT4ER1 



MER2: 

T4ERG; 



LT4X; 



JSR PC.SNPI 

BIT 01000, QSWR 

BEQ t T4X 

DEC RO 

BeQ I.T4G 

INC Rl 

BR L.T4A 

mov #i,exn. 

BR LT4ERG 

MOV 42.EXR. 

MOV &MSI.T4.EMADDR 

MOV 0MSG9.ERAOO 

MOV > , U.T4A,SC0LP 

JSR PC.LTGER 

BR I.T40 

JMP Tscoa 



SEQ 0046 



; PRINT SERIAL NUMBER 
jBRANCH IF NOT MANUAL 



INTERVENTION 



I IP DONE ALL: BR 
j BUMP SLAVE 
{CONTINUE 
{FLAG EXPT: NOT 



RECEIVED 



jELAG RECVD: NOT EXPT 
tSET I.T4 HEADER 
{SET ERROR CONDI! ION 
{SET SCOPE ADDRFSS 
{GO TO ERROR 
;IK NO SCOPF; BR 
{RETURN TO SCHEO 



C/TEAEO IN05-TI 16 !U// CIl 1 
CZTt.AE.Pll 06 -APR -84 09:45 



14 

MAC If 11 30C1046) 06 APR -84 09:48 PAGE 39 



SfcU 0047 



1*45*1 










1940 










1941 


0C4?0? 


01..' 737 


0?4 314 


000616 


±94? 


004? 10 


001/3 7 


0167?6 




1945 


004?.i4 


01 ? 700 


00003? 




1944 


004 ??0 


00 SO 01 






194S 


004 ??? 


oiOl.'i 


174306 




194 b 


004?? 5 


»n;/o? 


1 7430? 




194/ 


004? 3, '* 


C-V70? 


1"*7740 




1943 


004."? 36 


0?OUV 






1949 


004 ?40 


00 10? 6 






19S0 


oo/jjk: 


oossoo 






19S1 


004.- '4^ 


00140? 






19S. 1 


00*!?46 


00::.?01 






19S3 


004 ?S0 


000/64 






14^4 


004 ?3? 


01? 701 


0000 IS 




J9SS 


004 ?S6 


oi;:7oo 


001000 




i<:bt> 


004 ?6? 


010177 


174?46 




w: 


004?66 


1 7 70? 


174?4? 




19S« 


0^:4?/,? 


04: /O? 


000140 




19S9 


CO*? '6 


O-'OIO? 






1960 


004X00 


001401 






1961 


004 30c* 


000416 






3 96? 


004 504 


00 j 300 






1963 


004 SO* 


0014^ 






3 964 


004 310 


06? /OL 


ooo?oo 




196S 


004 3 W* 


000 /6? 






.1 966 


004 31.6 


oi.*:'* 3,* 


0?1?73 


000666 


;i 96 ' 


004 3?4 


01? 737 


004??:? 


000706 


3 968 


004 : y V 


004 / 5 / 


016356 




1 969 


0u4 53-» 


(•on : 4i 






1970 


004 540 


1 ? < *> ? 


0??010 


000666 


1 9 .' 1 


004 54,, 


01?/V 


004?6? 


000706 


19 7;* 


004 V.4 


(104/* / 


016536 




1 9 ' '. 


004 -,60 


000 /SI 






19 '4 


004 3»..- 


(r04 , 5/ 


016600 




1^'S 


004 360 


000137 


002530 




i9Vfe 











jtOCilC TEST 5: MAINTENANCE. REGISTER BIT TEST******* *** 

jSET TEST HEADER 

(GO INIT 

I SET LOOP FOR HITS 4 

I SET TEST WORD 

j SEND TEST WORD TO MR 

j READ MR 

{MASK BIT!, 4-0 

j SEE IE EXPT = RECVD 



IE DONE LOOP: BR 
BUMP TEST WOWD 
CON! INUE t OOP 



I.T5: 


MOV 


OMSl TS.EMADOR 


l.TSITt 


JSR 


PC.INIU 




MOV 


#3?,R0 




CLR 


Rl 


I T5A: 


MOV 


R1.3MR 




MOV 


WHR.R? 




BTC 


#177740, R? 




CMP 


Ri.R? 




BNE. 


LTSFR1 


LT5B: 


DEC 


RO 




B*Q 


l.TSC 




INC 


Rl 




BR 


LISA 


LT5Ci 


MOV 


#15, Rl 




MOV 


#1000. RO 


LT5D: 


MOV 


Ri,o)MR 




MOV 


8MR.R? 




B1C 


0140, R? 




CMP 


RI.R? 




BEQ 


I..T5E 




BR 


L T5ER? 


I.T5E: 


DEC 


RO 




O r 


LT5X 
3?00,R1 




'i .} 


I TSD 


I.T5ER1; 


c <■, 


*>»1SCtl4,' RADO 
#L7SA,SC0l.P 




.JSR 


PC.L TGER1 




BR 


LTSB 


LT5ER?; 


MOV 


#MSG15,ERAD0 




MOV 


#l TSU.SCOi.P 




JSR 


PC.LTGERl 




BR 


I T M 


LT5X: 


JSR 


PC, i!ER 




JMP 


TSCO? 



FOR BITS IS / 



SET TEST WORO • WAM 

SET LOOP 

LOAD MR 

READ MR 

MASK OUT 

SFE IF EXPT 

IF" SO; BR 

Fl SF GO TO ERR 



BITS 



^,6 

RECVD 



V DONE LOOP: 3R 
BUMP TEST WORD 
CONTINUE I OOP 
SET ERROR COD* 
SET SCOPE. ApDRKiS 
GO TO ERROR 
CONTINUE 
SET ERROR CODE 
SF T SCOPE ADDRESS 
GO TO FRROR 
CONTINUE 

GO SI t IF 1 II RATIONS 
[RE TURN TO SCHtO 



c/n *\t o 


n ? . n 


Iti It'.'.' 


CM i 


MACYU 


CZTF Af . 


n 06 APR 84 


09:45 




1-*.M 










1*.'* 










1 *-» t v > 


loi ; V 


0CW40 






WM 


0013/.* 


01O7V7 


07M363 


000616 


l^t\? 


004407' 


01.. •'00 


00000? 




i«*c ^ 


:.044O6 


005COI 






1^64 


004410 


00737 


01CW26 




l'*8S 


* .044 14 


0101''/ 


W4i:-.2 




ls*6 


L 044^0 


01 '/o;> 


1 '4116 




t'W: 


H)I4,M 


04/70, 1 


160000 




1988 


•' 044 30 


o/oi or 






i^T 


0443^ 


00 ; 010 






1 Q9C 


L-^44 34 


OOV'-OO 






1*> C *1 


t'.i4436 


ooi.r ' 






' ^'K 


M440 


•V.'..'->0 


0000 ,i 




l'-*V3 


■ A 4444 


001760 






IS^A 


(>i.444b 


oi.: /oi 


017/7/ 




i'W' 


o :4.iW 


000 >56 






19*6 


0- 4454 


03/7 3 7 


O_Y>036 


000666 


199* 


')■.'• 146? 


010 /5V 


004414 


000706 


1998 


<. -i4 70 


00*1 .' 3 / 


016336 




• r«C)t) 


w 1 4/4 


000 7S - 






.voe 


v ■ »■" 7t» 


()i)4 73 7 


01660 ' 




l'oc: 


00^05 


000137 


005530 




d*05 











30(1046) 06 APR 84 09*48 



J4 

PAGE 40 



SfcQ 0048 



•LOGIC TEST 6: TC REGISTER BIT TEST********** 



1.16: 


NOP 






I T6IT: 


MOV 


MSLT6.EMADDR 


jPOINT TO LT6 HEAUirR 




MOV 


#3 # R0 


5 SET NUMBER OF TESTS 


I T6A1: 


CI.R 


Rl 




I.T6A: 


JSR 


PC.INIT1 


{GO INIT 


LT6B: 


MOV 


RX.STC 


{WRITE TC 




MOV 


3TC.R2 


{READ TC 




HIC 


4160000»R2 


[MASK OUT SAC 




CMP 


Rl.R? 


HiLE IF EXPT - RECvD 




BNf. 


LT6ER1 


{IF NOT: BR 


LT60; 


DEC 


RO 






BEG 


L.T6X 


j If" DONE AIL: BR 




CMP 


frl.RO 


{SEE IF RESET TEST 




BEQ 


LT6A1 


{IF SO: BR 




MOV 


#177;?, Rl 


i SET TEST WORD 




BR 


L.T6A 


}D0 SET TEST 


I.T6ER1: 


MOV 


0MSG18.ERADD 


jSET ERROR CODe 




MOV 


*l.T6B,SC0LP 


j SET SCOPE ADORES 




JSR 


PC.LTGER1 


{GO TO ERROR 




BR 


I.T6D 


» CONTINU* 


LT&Xt 


JSR 


pc.rtR 


{GO SEE V ITERATIONS 




JMP 


TSCD5 


;RETURN TO SCHEU 
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StQ 0049 



0005 
ooot> 












{LOGIC 


TEST 7: KRAME 


COUNT BIT TEST********** 


004506 


000040 






1.17: 


HOP 






L 7oo ; 


004510 


010 700 


000003 




i r 7 r r • 


MOV 


#3 , RO 


{SET TEST NUMBER 


oooa 


004514 


010737 


004430 


000616 


I..T7C: 


MOV 


4MSL.T7.EMADDR 


t SET TEST HEADER 


0009 


004500 


005001 








CLR 


Rl 


{SET TEST WORD 


0010 


004504 


004 73/ 


016706 




LT7A; 


JSR 


PC.INIT1 


tGO INIT 


.7011 


004530 


010177 


173760 






MOV 


Ri.arc 


{CLEAR ERAME C0UN1 


4 :ol? 


004 534 


017700 


173756 






MOV 


3KC.R0 


j READ EC 


0013 


004540 


000100 








CMP 


ri.ro 


{SEE IE EXPT * RECVD 


"014 


004540 


001010 








BNE 


LT7FR1 




00 15 


004544 


005300 






LT7B: 


DF.C 


RO 


i SEE U DUNI: AL.l 


0016 


00454b 


001417 








BEU 


LT7X 


[IE SO: BR 


001.' 


004550 


000700 


000001 






CMP 


i71.R0 


[SEE IE RESET TEST 


ooia 


004554 


001757 








BEQ 


LT7C 


j IE SO: BR 


0019 


004556 


010701 


177777 






MOV 


*-l,Pl 


{SET TEST WORD TO -1 


:.oso 


004560 


000760 








BR 


LT7A 


{CONTINUE 


0001 


00456-, 


010737 


000055 


000666 


LT7ERli 


MOV 


ftMSG19,ERADQ 


;SET ERROR CODE 


0000 


004570 


01073? 


004504 


000706 




MOV 


Ol.T/A.SCOLP 


;SET SCOPE ADDRESS 


0003 


004600 


004 737 


016336 






JSR 


PC.LTGER1 


{GO PRINT ERROR 


0004 


004604 


000757 








BR 


I.T7B 


{ELSE CONTINUE 


ooos 


004606 


010700 


000003 




LT7X: 


MOV 


03, RO 


{RESET TEST AMT 


S.QZb 


004610 


004737 


016600 






JSR 


PC. ITER 


{GO SEE IE ITERATIONS 


oor : 

0008 


004616 


000137 


002530 






JMP 


TSCDO 


{RETURN TO SCHED 
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2030 
2031 
2032 

2033 

20?4 
2035 
2036 

2039 

2040 

2041 
2042 
2043 

2044 
2045 
2046 
204 7 
2048 
2049 

2050 

JOS. 

2053 
2054 



0046,22 
004624 
00463^ 
004636 
004640 
004646 
004654 
004660 
004664 
0046 70 
0046 72 
004674 
004676 
004 700 
004 704 
004 706 
004712 
004714 
004722 
004 730 
004/34 
004 736 
004742 



000240 
012737 
012700 
005001 
012777 
013777 
010177 
017702 
042702 
020102 
001010 
005300 
001417 
022700 
001754 
012701 
000752 
01273* 
012757 
004 7^>/ 
00075/ 
004737 
000137 



024501 
000003 

000040 
000620 
17 3630 
1/3624 
177701 



000001 
000076 

0220/4 

004640 
016336 

016600 
002530 



SEU 0050 



LT10B: 



jlOGIC TEST 10; FUNCTION CODE BIT TEST********** 



LTIO: 
000616 I.T10IT: 

LTlOAlj 
1/3652 LTlOAt 

173644 



000666 LT10E1: 
000706 



UTIOX: 



NOP 

MOV OMSLUO.EMADDR 

MOV #5,R0 

CLR Rl 

MOV 040,o)C5 

MOV DRVN.SCS 

MOV R1.3C1 

MOV aci,R2 

BIC 0177701, R2 

CMP R1.R2 

BNE LT10FI 

DEC RO 

BEQ LT10X 

CMP 01, RO 

BEQ LT10A1 

MOV 076, Rl 

BR LT10A 

MOV 0M5G20.ERADD 

MOV OLT10A.SCOLP 

JSR PC.LTCER1 

BR LT10B 

JSR PC. ITER 

JMP TSCD2 



iSET TEST HEADER 
{SET NUMBER OF TESTS 
iSET TEST WORRD 
jINIT 

SELECT DRIVE 

WRITE CI 

READ CI 

MASK FUNCTION CODE 

SEE IF EXPT - RECVD 



{IF DONE ALL: BR 
j SEE IF RESET TEST 
{IF SO: BR 

jSET TEST WORD 
DO SET TEST 
SET ERROR CODE 
SET SCOPE AODRESS 

jGO PRINT ERROR 
ELSE CONTINUE 
GO SEE IF ITERATIONS 
RETURN TO SCHEO 
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SEQ 0051 



2056 










2057 










2058 










2059 


004 746 


000240 






20b0 


004 750 


012737 


024557 


000616 


2061 


004 756 


004737 


016726 




2062 


004 762 


017702 


173522 




2063 


004 766 


032702 


000001 




2064 


004 772 


001030 






2065 


004 774 


012777 


000015 


173532 


2066 


005002 


005077 


173510 




206/ 


005006 


052777 


001700 


173526 


2068 


005014 


012777 


000071 


173466 


2069 


005022 


017702 


173462 




2070 


005026 


032702 


000001 




2071 


005032 


001424 






2072 


005034 


0C4737 


016726 




2073 


005040 


017702 


173444 




2074 


005044 


032702 


000001 




2075 


005050 


001444 






2076 


005052 


000430 






207? 


005054 


012737 


022126 


000666 


2078 


005062 


012702 


000001 




2079 


005066 


005001 






2080 


005070 


012737 


004750 


000706 


2081 


005076 


004737 


016336 




2082 


005102 


000734 






2083 


005104 


012737 


022164 


000666 


2084 


005112 


005002 






2085 


005114 


012701 


000001 




2086 


005120 


012737 


004 7 74 


000706 


2087 


005126 


004 737 


016356 




2088 


005132 


000740 






2089 


005134 


012737 


022205 


000666 


2090 


005142 


005001 






2091 


005144 


012702 


000001 




2092 


005150 


01273? 


005034 


000706 


2093 


005156 


004 737 


016336 




2094 


005162 


004 7 37 


016600 




2095 


005166 


000137 


002530 





■LOGIC TEST 11; GO BIT SET RESET********** 



LT11: 


NOP 






LT11IT: 


MOV 


4MSLTU.EMADDR 


j SET TEST HEADER 




JSR 


PCINIU 


{GO INIT 




MOV 


3C1.R2 


{READ CI 




BIT 


41. R2 


{SEE IF GO-0 




BNE 


LT11E1 




LT11B: 


MOV 


415, SMR 


{SELECT WAM 3 




CLR 


3FC 


{ASSURE res - 1 




BIS 


41700, S)TC 


{ASSURE FMT OK 




MOV 


471, au 


{SET READ*GO 




MOV 


aci,R2 


{READ CI 




BIT 


41, R2 


{SEE IF GO *1 




BEQ 


LT11E2 




LTllCt 


JSR 


PC.INIT1 


{GO INIT 




MOV 


8C1.R2 


{READ CI 




BIT 


41. R2 


{SEE IF G0*0 




BEQ 


LT11X 


{IF* SO -BR 




BR 


LT11E3 


{ELSE GO TO ERROR 3 


LT11E1: 


MOV 


4MSG21,ERADD 


{SET ERROR CODE 




MOV 


41, R2 


;SET REVO 




CLR 


Rl 


;SET EXPT 




MOV 


4LTUIT.SC0LP 


{SET SCOPE AD 




JSR 


PC.LTGER1 


{GO PRINT ERROR 




BR 


LT11B 


{ELSE CONTINUE 


LT11E2: 


MOV 


4MSG22.ERADD 


{SET ERROR CODE 




CLR 


R2 


jSET RCVD 




MOV 


41, Rl 


{SET EXPT 




MOV 


4LT11B,SC0LP 


{SET SCOPE ADDRESS 




JSR 


PC,'. TGER1 


{GO PRINT ERROR 




BR 


LT11C 


sELSE CONTINUE 


LT11E3: 


MOV 


4MSG23,ERADD 


{SET ERFJR CODE 




CLR 


Rl 


{SET EXPT 




MOV 


41. R2 


{SET RCVO 




MOV 


4L.T 11C, SCQLP 


{SET SCOPE ADDRESS 




JSR 


Pr.l.TGERl 


{GO PRINT ERROR 


LT11X; 


JSR 


PC . IT ER 


{GO S"-fc If- IT "-RAT IONS 




JMP 


T5C02 


{RETURN TO SCHED 



N4 
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00^ 7 

.'1ACJO 












(LOGIC 


TEST 12: DRIVE READY BIT***** * **** 


4. . Vy - J 

0100 


005172 


000240 






LI 10: 


NOP 






0101 


005174 


010737 


004624 


000616 


LT121T: 


MOV 


0M5LU2.EMADDR 


;SET TEST HEADER 


010 J 


005202 


004737 


016706 






JSR 


PC.INIT1 


;G0 INIT 


f no? 


005006 


0327? 7 


000000 


173306 




BIT 


#200, SOS 


;SEE IF DRY-1 


0104 


005014 


001426 








BEQ 


LT12E1 




0105 


005016 


010777 


000015 


173310 


LT12B: 


MOV 


015, SMR 


j SET WAM3 


0106 


005224 


005077 


173066 






CLR 


arc 


j ASSURE ECS » 1 


0107 


005030 


0527 7 7 


001700 


173304 




BIS 


01700, STC 


;ASSURE FMT OK 


0108 


005036 


012777 


000071 


173044 




MOV 


0/1, aci 


:SET READ ♦GO 


0100 


005044 


030777 


000000 


173050 




BIT 


oooo.sos 


j SEE IE DRY=0 


0110 


005052 


001000 








BNE 


LT10E0 




2111 


005254 


004737 


016/26 




LT12C: 


JSR 


PC.INIT1 


:G0 INIT 


0110 


005060 


03277/ 


000200 


1/3234 




BIT 


0200, SOS 


5 SEE IF DRY*1 


on? 


005066 


001033 








BNE 


LT12X 


5 IF" SO; BR 


0114 


005270 


000422 








BR 


LT12E3 


{ELSE GO TO FRROR 


0115 


005270 


012737 


000040 


000666 


LTlSElt 


MOV 


OMSG24.ERA0D 


;SET ERROR CODE 


0116 


005300 


012737 


005174 


000706 




MOV 


OLT121T.SC0LP 


j SET SCOPE ADDRESS 


on? 


005306 


004 73/ 


016330 






JSR 


PCLTGER2 


{GO TO ERROR 


0118 


005310 


000741 








BR 


LT12B 


{CONTINUE 


0119 


O05314 


012737 


002266 


000666 


LT12E2: 


MOV 


OK3C25,tRADD 


{SET ERROR CODE 


0100 


005320 


012737 


005216 


000706 




MOV 


OLT12B.SC0LP 


;SET LOOP ADDRESS 


0121 


005330 


004 737 


016330 






JSR 


PC.LTGERO 


{GO PRINT ERROR 


0120 


005334 


000*. 4? 








BR 


LT12C 


{CONTINUE 


010? 


005336 


01073/ 


002315 


000666 


I T12F.3: 


MOV 


OMSG25A.ERAD0 


{SET ERROR CODE 


2104 


005344 


012/3/ 


005054 


000706 




MOV 


0LU2C.5CQLP 


I SET ERROR LOOP 


oio:» 


005350 


004 737 


016330 






JSR 


PC.LTGER2 


{GET PRINT ERROR 


0106 


005356 


004 73/ 


016600 




UTX2X; 


JSR 


PC. ITER 


{GO TO ITERATION S 


2107 


005362 


000137 


002530 






JMP 


T5C02 


{RETURN TO SCHEO 



SEQ OO50 



iUBROUTINE 



C/HAEO 


1M03-TI 


1 6 Wt? 


CU 1 


MACU1 


30(1046) 


06 APR 
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•64 09 {48 PAGE 


45 
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PI I Ob -APR -34 


09 j 45 












2130 

»? 1 5 1 












j' OGIC 




)Oi. >.6 


005000 






t T13: 


Cl.R 


RO 




^13-5 


005570 


012 73 7 


U246 75 


0006 In 




MOV 


0MSIT13.EMADDR 


|SET TEST HEADER 


2134 


0053 76 


004737 


016V6 




I T13IT; 


JSR 


PC.INIT1 


iCO INIT, SELECT DRIVE 


2135 


00540? 


012737 


005460 


000664 




MOV 


0l.U3X.RTRN 


1 SET RETURN ADDRESS 


2136 


005410 


00507 7 


173074 






CLR 


aci 


iCLEAR CSt 


213 7 


005414 


00507 7 


1^3146 






CLR 


VPSU 


{SET PRIORITY 


213« 


005420 


05^7 7 7 


000100 


173062 




BIS 


0100, QC1 


iRIT SET IE 


2 1 3* 


005426 


005300 






I T13A: 


dec 


RO 




2140 


005430 


001376 








BNf 


I.T13A 


jAUAIT INTERRUPT 


214 1 


0054 3? 


012777 


000340 


173126 


I T13E.V: 


MOV 


0340, QPSW 


jRESET PRIORI Tt 


2142 


005440 


012737 


022342 


000666 




MOV 


0MSG26,ERADD 


;SE r ERROR CODt 


2N3 


00544b 


012737 


0053 76 


000^06 




MOV 


01 T13IT.SC01.P 


|SET LOOP ADDRESS 


2144 


005454 


004 73 7 


016330 






JSR 


PC, I TGERi* 


iGO PRINT ERROR 


2145 


005460 


004 73 7 


016600 




LT13XI 


JSR 


PC, HER 


|G0 TO ITFRATION liUBR 


2146 


005464 


000137 


002530 






JMP 


TSCD2 


j RE TURN TO SCHF.D 



SEQ 0053 



SELECT ABOVE 



C7UAI .(Ml 
2148 

2i4^» 

2150 

2151 

2152 



Tt U> lu 
Ob -APR 



'.' Cil i 
84 09} 45 
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ST 



21 
2154 

2155 

2l5t> 
2157 
2158 
215* 
21*0 
21M 
2162 
2165 
2164 

2165 
2l6t> 
Jib - : 

2168 
216^ 
2170 
21 71 
21'; 2 
2i:3 



00S4 ;o 

0054 7t> 
005500 
005504 
005506 
005512 
005520 
005524 
005530 
003534 
005540 
005544 
005546 
005550 
005556 
005564 
0055 "0 
0055^4 



001005 
00573 7 
0014J3 
000137 
012737 
012704 
004 737 
004 73/ 
C12701 
017702 
020102 
001410 
012737 
012737 
004 7 3 7 
004 73/ 
00013 7 



001000 

000734 

016650 
024 742 
02714/ 
017200 
016726 
014602 
172756 



005530 
0223 71 

016336 
O166OO 
002530 



1730 72 



000 ;o6 

000666 



SF.Q 0054 



1. 114 1 



000616 LT14A: 



I T14IT: 



I T14X: 
LT14XX; 



I THE NbXt 4 TESTS ARF. MANUAL INTERVENTION STATUS ft Si 
jTHf OPERATOR WILL BE. REQUIRED TO 
l CONTROL PANfc't. IN ACCORDANCE WITH 



MANIPULATE THi TE16 
TTY INSTRUCTIONS. 



jLOGIC TEST 14: STATUS AT DOT ON LINE, I OAOED, NO WRITE RING 



BIT 01000, aSWR 

BNE LT14A 

TST STf'LG 

BEQ LT14XX 

JMP INMT 

MOV 0MSI.T14.EMADDR 

MUV *MMSGl,R4 

JSR PC, INST 

J^R PC.INIT1 

MOV *14602,Rl 

MOV B0S.R2 

CMP RI.R2 

BEQ I.T14X 

MOV 0LT14IT.SC0LP 

MOV OMSG27.F.RADD 

JSR PC.LTGERi 

JSR PC, ITER 

JMP TSCD2 



SEE IF INHIB MAN TST 

I* NOT: BR 

;ee: IE SINGLE TEST 

IE NOTj BR 

ELSE GO PRINT INHIB MSO 

SET TEST HEADER 

SET INSTRUCTION ONE 

GO DO INSTRUCTION 

INIT, SELECT DRlVt » SLAV* 

SET TEST WORD 

ASSURE MOL.URl .OPR.DRr.HOT 

I*' SO j BR 

SET LOOP ADDRESS 

SET ERROR COD* 

GO PRINT ERROR 

GO SET If ITERATION 

RETURN TO SCHEO 



I) 1 



CJTt At o 


TNOS-lf. 
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MACUi 


30(1046) 


06 APR 


•84 OS j 48 PAGE 47 


C/Tl *K 


Ptl Ob -APR 84 


09:45 












.: 1 -Y 

^1?8 












ll.OGIC 


TFST 15} STATUS AT BOT, OFTl INK, 1 HADED, NO WRITF 


005600 


0327 77 


001000 


1?2 76c? 


I.T15: 


BIT 


*1000,<\)SWR 


SEE IP INHIB MAN TST 


.U» 


005t*06 


001005 








RNf 


LT15A 


IF NOTt BR 


2180 


005610 


005 73/ 


000 734 






1ST 


STH.G 


SEE IP SINGLE TFST 


.:ihi 


005614 


001433 








BEQ 


LT15XX 


IF NOT: BR 


«:I8«? 


005616 


00013? 


016650 






JMP 


INMT 


ELSE GO PRINT INHIB MSG 


*H83 


005622 


012/3? 


025051 


000616 


LT15A: 


MOV 


*MSL.U5,F.MADDR 


SET TEST HEADER 


2184 


005630 


012 704 


02 7245 






MOV 


•MMSG2.R4 




2185 


0056 54 


004.37 


017200 






JSR 


PC, INST 


PRINT INSTRUCTION 


2186 


005640 


004 73/ 


016 7*6 




LT15IT : 


JSR 


PC, INI T.? 


GO INIT, SELECT DRIVE, SLAV 


218" 


005b44 


01c? 701 


100 700 






MOV 


<UOO/00,R1 


SET TEST WORD 


2188 


0O56S0 


017 70.? 


172646 






MOV 


aos,R2 


READ STATUS 


218$ 


005654 


02010? 








CMP 


R1.R2 


SEF OF EXPT-RCVD 


21*0 


005656 


001410 








re a 


I.T15X 




21<H 


005660 


012737 


005640 


000 706 




MOV 


OLT15IT.SC01.P 


SET LOOP ADDRESS 


2i i v 


005666 


012737 


025371 


000666 




MOV 


«MSG2 7 , F RADD 


SET ERROR CODF 


21*3 


0056 74 


004 73? 


016336 






JSR 


PC.LTGtRl 


GO PRINT FRROR 


2i'*4 


005-00 


004 737 


016600 




I 7 l:aX; 


JSR 


PCI.HR 


GO St't IK IT! RATIONS 


2195 


005704 


000137 


002530 




LTX5XX; 


JMP 


rscoa 


RETURN TQ SCMED 



S£Q 0055 



R TNG* *♦******+ 



C.'TtAtO I NO 3 
CZTF.At.Pll 



Tt lt> Ri 
Ob APR 



'.' CM i 
84 09;45 



21*7 

21*8 
21** 
*VOO 

w\\n 

2202 
220? 
2204 
2205 

220 7 
2206 
220'? 
2210 

ill!. 1 1 

2212 
2215 
2214 
2215 
2216 

221 ■ 
2218 

2220 

2221 



005710 
005716 
005720 
005 7£4 
005726 
005752 
005 740 
005744 
005750 
005754 
005760 
005 764 
005766 
005770 
005 7 76 
006004 
006010 
006014 
006020 



032777 
001005 
005737 
001433 
000137 
012737 
012704 
004 737 
004 737 
013701 
017702 
020102 
001410 
012737 
012737 
004 737 
004 737 
000137 
116701 



001000 

000734 

016650 
025141 

027266 
01.7200 
016736 
006020 
172536 



005 750 
022371 
016336 
016600 
002530 



t 
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000706 
000666 



SEQ 0056 



172652 I.T16: 



000616 LTlGAs 



LTlSITi 



l.TlbX: 

I.T16XX; 

STWD16; 



(LOGIC TEST 16; STATUS AT EOT, ON I TNE , NO WRITE RING***** * ♦ ♦ * * 



BIT 01000, n)SWR 

BNE LT16A 

TST STFLG 

BEQ LT16XX 

JMP INMT 

MOV 4MSLT16.EMADDR 

MOV OMMSG3.R4 

JSR PC. INST 

JSR PC, INI K? 

MOV STW016.R1 

MOV 8DS.R2 

CMP R1,R2 

BEQ LT16X 

MOV 0LU6IT,SCOLP 

MOV frMSG2 7,ERADD 

JSR PC, I FGfcRl 

JSR PC, ITER 

JMP T5CD2 

,WQRO 116701 



SEE IF INHIB MAN TST 

IF NOT: BR 

SEE IF" SINGLE IF ST 

IF NOT: BR 

ELSE GO PRINT INHIB 

SET TEST HEADER 



MSG 



GO PRINT INSTRUCTION 

SELECT DRIVE, SLAVE 

SET TEST WORD ( ATAJMOI !WRL Jf.OT 'DPR.'DRt !SSC !5LA ) 

READ STATUS 

SEE IF EXPT-RCVD 

IF SO: BR 

SET LOOP ADDRESS 

SET ERROR CODE 

GO PRINT F_RROR 

GO SEE IF ITERATION 

RETURN TO SCHfcD 

SET LIP TEST WORD KIR FF.1*. 

CONTENTS OF TEST WORD FOR 

A TU77 IS 116741 



• t 
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SEQ 0057 



« t, *. . * ■ 

,"» ;» 1A 

l. i_v ** 

"\ •* >c: 
i.-C- 1. - » 

2228 

2230 
2231 

2232 
2233 
2234 

2235 
2236 
22 3 r 
2238 
223^> 
2240 
2241 

224 3 
2244 
224 '■» 
2246 



006022 
006030 
006032 
006036 
006040 
006044 
006052 
006056 
006062 
006066 
0060 72 
006076 
006100 
006102 
006110 
006116 
006122 
006126 
006132 



032777 

001005 
005737 
001433 
00013/ 
012737 
012704 
004/37 
004737 
013701 
017702 
020102 
001410 
012737 
012737 
004737 
004737 
00013/' 
110701 



001000 

000734 

016650 
025230 
027324 

017200 
01673o 
006132 
172424 



006062 
022371 
016336 
016600 
002530 



172540 LT17: 



000616 LT17A: 



LT171T 



000 706 
000666 

I.TWX: 
i T17XX- 
STWD17j 



ll.OGTC TEST 17: STATUS AT ON LINE, I OADED** ******** 



BIT tflOOO.SJSWR 

BNE LT17A 

1ST STKLG 

BEQ LT17XX 

JMP INMT 

MOV omslti7,emaddr 

MOV 0MMSG4.R4 

JSR PC, INST 

JSR PC.INIT2 

MOV STWD17.R1 

MOV S0S.R2 

CMP R1.R2 

BEQ LT17X 

MOV <H.T17IT,SC0LP 

MOV frMSG2'/,ERADD 

JSR PC.LTGERl 

JSR PC, ITER 

JMP 7SC02 

,WQRQ UQ7Q1 



SEE IF INHIB MAN TST 

IF NOT; BR 

SEE IF SINGLE TEST 

IF NOT: BR 

ELSE GO PRINT INHIB MSG 

SET TEST HEADER 



GO PRINT INSTRUCTION 
SELECT DRIVE, SLAVE- 
SET TEST WORD 
READ STATUS 
SEE IF EXPT-RCVD 
IF SO: BR 
SET LOOP ADDRESS 
SET ERROR CODE 
YES PRINT ERROR 
GO SEE IF ITERATIONS 
RETURN TO SCHED 
TEST WORD FOR 1E16 
;CONTENTS OF TE^T WORD 
{IS 110741 FOR A TU77 
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SEQ 0058 



2248 










224^* 










2250 










2251 










■> 11, > 










2!> r V? 










2254 










JJS'i 










2256 


006134 


012737 


0253.11 


000616 


2257 


006142 


012737 


006162 


000 706 


2258 


006150 


012700 


000022 




225^ 


006154 


012737 


000544 


0006 70 


2260 


006162 


004 73/ 


016 726 




2261 


00b 166 


017777 


177777 


172316 


2262 


006174 


012701 


000001 




2263 


006200 


117777 


172464 


172302 


2264 


006206 


017702 


172312 




2265 


006212 


030102 






2266 


006214 


001011 






2267 


006216 


012737 


027653 


000t.66 


2268 


006224 


012737 


000001 


000712 


2269 


006232 


004737 


015222 




22 70 


006236 


000404 






2271 


006240 


020102 






2272 


006242 


001402 






22 75 


006244 


004 75 7 


015210 




2274 


006250 


005300 






2275 


006252 


001403 






22/t> 


006254 


005237 


000670 




227 7 


006260 


000740 






2278 


006262 


004 737 


016S00 




22 **'» 


(-06266 


004/3/ 


0156/0 




2280 


006272 


000137 


00253Q 





LT20: 

LT20IT 
LT20A: 



LT20B: 



LT20C 



LT20X; 



j THE FOLLOWING 11 TF.STS WILL TEST ALL POSSIBLE ERROR 
{BY FORCING THEIR CONDITIONS THROUGH 
i SEQUENCES AND USING THE MAINTENANCE 



BITS 
VARIOUS ILLEGAL PROGRAMMING 
WILL MODES AVAILABLE WITH TM03 

WILL BE 



{FOR EACH ERROR CONDITION SET THE APPROPRIATE STATUS W 


j CHECKED, IE: ERR, ATA, 


SLA, SC ETC. 


{LOGIC 


TEST 20 j ILLEGAL 


FUNCTION (ILF)********** 


MOV 


0MSLT20.EMADDR 


j SET TEST HEADER 


MOV 


#LT20A,5C0l.P 


{SET LOOP ADDRESS 


MOV 


022.R0 


{SET NUMBER OF ILL CODES 


MOV 


0ILFT. TEMPI 


{POINT TO START Ih TAHLt 


JSR 


PC.INIT1 


{GO INIT, SELECT SLAVE ► DRIVE 


MOV 


*-i, awe 


{SET WO -I 


MOV 


01, Rl 


{SET TEST WORD 


MOVB 


OTEMPi.HCl 


{SET ILL CODE 


MOV 


SER.R2 


{READ ER 


BIT 


R1.R2 


{SEE IF EXPT-RCVO 


BNE 


L.T20B 


{IF SO: BR 


MOV 


OTMS17,ERAD0 


{SET ERROR CODE 


MOV 


Ol.EXFL 


{SET EXPT fLG 


JSR 


PC.LTGF.RO 


{GO PRINT ERROR 


BR 


LT20C 




CMP 


R1,R2 


{SEE UNEXPECTED ERRORS 


BEQ 


L.T20C 


{IE NOT: BR 


JSR 


PC.LTGER3 


{ELSE PRINT ERROR 


DEC 


RO 


{SEE IF DONE ALL ILL COOLS 


BtQ 


LT20X 


{IE SO: BR 


INC 


TEMPI 


jBUMP ADDRESS 


BR 


LT20A 


{CONTINUE 


JSR 


PC. ITER 


{GO SEE. IF ITERATION 


JSR 


PC.DRVCLR 




JMP 


TSCQ2 


{RLTURN TQ SCHtO 



ur 



c/n m o ino3 



3383 
32tf4 
3385 
3336 
*?^".' 
3388 

2290 
3291 
3393 
3393 
2?94 

??Q^ 

22 i >i> 

339/ 

3?99 
2300 
2301 
350? 
3303 
.7304 

3305 

350/ 
3308 
3309 
2310 
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SEQ 0059 



0063/6 
006304 
006313 
006316 
006334 
006333 
006340 
006344 
006350 
006354 
006356 
006360 
006366 
006374 
006400 
00640? 
00640'- 
006406 

006413 
006416 
006430 
006433 
006436 
0064 3? 
006436 



013/37 
013737 
00< 737 
05377/ 
013777 
013777 
00507 7 
013/01 
017 703 
03010? 
001011 
013737 
012737 
00'/ 737 
000404 
030103 
00140? 
004737 

013 703 

005305 
0012 76 
004 737 
004 73/ 
004 737 
000137 



0353 70 
00631? 
016736 
000300 
000015 
0000 71 
173153 
000004 
173150 



03/66 7 

000001 
015333 



015310 

040000 



015054 
0156/0 
016600 
003530 



000616 
00070b 

17331b 
1 7330? 
172)50 



000666 
000712 



LT21 



LT21A: 



; ♦♦B 

L r?lB: 
LT21XA; 



l LOGIC TEST 21; REGISTER MODIFICATION REFUSEDCRMR )♦*♦♦* ♦*♦*♦ 



MOV 

MOV 

JSR 

BIS 

MOV 

MOV 

CLR 

MOV 

MOV 

HIT 

BNE 

MOV 

MOV 

JSR 

BR 

CMP 

BEQ 

JSR 

LT21B: 

MOV 

DEC 

BNE 

JSR 

JSR 

JSR 

JMP 



M1SLT31.EMADDR 

tfLT21IT,SC0LP 

PC.INIT1 

osoo.arc 

015, &MR 

*7i,aci 
arc 

04. Rl 

BER.R2 

R1.R2 

LT21A 

*TMS19,ERADD 

ffl.EXFL 

PC. I TGt.RO 

L.T21B 

R1.R2 

LV21B 

PC.LTGER3 

JSR PC.lTtR 

440000, R3 

R3 

LT21XA 

PC.EORPA 

PC.DRVCUR 

PC, ITER 

TSCD2 



SET TEST HEADER 

SET SCOPE LOOP ADDRESS 

GO INIT, SELECT SLAVE, DRIVE 

SET FORMAT 

SET UAM3 

SET READ ♦GO 

ATTEMPT WRITE TO FC 

SET TEST WORD 

GET ER 

SEE IF EXPT-RCVO 

IF SO: BR 

SET ERROR CODF- 

SET EXPT FLG 

GO PRINT ERROR 

SEE IF UNEXPECTED ERRORS 

IF NOT: BR 

ELSE GO PRINT ERROR 

i**B DELETED GO SEE IF ITERATION 

jDELAn FOR ALPHA 

5 G0 DO FOR CLEAR 

; ♦ »U GO SEE V ITERATION 
{RETURN TO SCHED 



CTLAt.O 


1N05-Tl.lt. R'/.' 


CU 1 


MACUl 




PI I Ob APR t*4 


09? 45 




2314 
2315 


00644 t ? 


012/37 


025424 


000616 


J? lb 


006450 


012737 


006456 


000706 


• '317 


006456 


004 737 


016726 




?3ltf 


00646? 


05277 7 


000020 


172030 


23 l l * 


0064 70 


012777 


177777 


172020 


4 )JA"> 


0064 7b 


012701 


000010 




AVI 


006502 


0427 7 7 


000020 


172010 


232? 


006510 


017 702 


172010 




2323 


006514 


030102 






2 32 4 


0065lo 


001011 






2325 


006520 


01273/ 


0276 75 


000666 


2326 


006526 


012737 


000001 


000712 


232: 


006534 


004737 


01522? 




2 328 


006540 


000404 






232 L > 


00654c? 


020102 






2330 


006544 


001402 






0351 


006546 


004 737 


015210 




2332 


00655? 


004737 


016600 




2333 


006556 


004/ 3/ 


0156^0 




2334 


006562 


000137 


002530 
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5EQ 0060 



I 122: 
LT22IT 



LT22A; 



LT22X} 



I LOGIC TEST 22: CONTROL BUS PARITY ( CPAR )* + * + + * + + + + 



SET TEST HEADER 

SET SCOPE LOOP ADDRESS 

INIT, SELECT SLAVE. »DRIVE 

ENABLE EVEN PARITY ON MB 

WRITE TO EC 

SET TEST WORD 

RESET PARITY TO ODD 

GET ER 

SEE IF EXPT-RCVD 

IF SO: BR 

SET ERROR CODE 

SET EXPT FLG 

GO PRINT ERROR 

SEE IE UNEXPECTED ERRORS 

If NOT: BR 

ELSE GO PRINT ERROR 

GO SEE. R ITERATION 

RETURN TU SCHfcD 



MOV 


0MSLT22.EMADDR i 


MOV 


0LT22IT.SCQLP j 


JSR 


PC. INIT1 { 


BIS 


020, 3CS , 


MOV 


0-1. arc j 


MOV 


010. Rl j 


BIC 


020, acs i 


MOV 


QER.R2 j 


BIT 


R1.R2 ; 


ONE 


LT 22 A ; 


MOV 


0TMS2O.ERADD j 


MOV 


01.EXFL { 


viSR 


PCLTGERO i 


BR 


LT22X 


CMP 


R1,R? i 


HEQ 


LT22X } 


JSR 


PC.LTGER3 ; 


JSR 


PC .ITER ; 


JSR 


D C.ORVCLR 


JMP 


TSCD^ i 



c/n.m-.o TM03-H u» w:: cm i 
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SEQ 0061 



.?33t» 


















23?; 

2338 

2339 












i LOGIC 


TEST 23s FORMAT 


ERROR(FMT)*++**+*+++ 


006566 


012/3/ 


025461 


000616 


I T23: 


MOV 


0MSLT23.EMADDR 


{SET TEST HEADER 


2340 


0065 74 


012737 


006602 


000706 




MOV 


0LT23IT.SCOLP 


; SET SCOPE ADDRESS 


2341 


006602 


004737 


016726 




L.T23IT: 


JSR 


PC.INIT1 


jGO INIT SELECT DRIVE *SLAVfc 


2342 










{♦♦B 


BIC 


0360, S)TC 


{♦♦B DELETED SET ILLEGAL FORMAT 


2343 


006606 


0527 7 7 


000360 


1/1726 




BIS 


0360, STC 


imB set illegal format for both 


.2344 


006614 


012701 


000020 






MOV 


020, Rl 


iSET TEST WORD 


2545 


006620 


012777 


000015 


171706 




MOV 


015, SMR 


{SET WAM 3 


2346 


006626 


012777 


0000 71 


171654 




MOV 


0/1, aci 


{SET READ*GO 


234;* 


006634 


017 702 


171664 






MOV 


atR.R2 


;READ ER 


2343 


006640 


030102 








BIT 


R1.R2 


{SEE IF EXPT-RCVD 


234Q 


006642 


001011 








BNE 


LT23A 


i IF SO; BR 


2350 


006644 


012737 


027 704 


000666 




MOV 


0TMS21,ERADD 


{SET ERROR CODF 


2351 


006652 


012737 


000001 


000712 




MOV 


01.EXFL 


{SET EXPT FLG 


2352 


006660 


004737 


015222 






JSP 


PC.LTGERO 


{GO PRINT ERROR 


2353 


006664 


000404 








BR 


LT23X 




2354 


006666 


020102 






I T23A: 


CMP 


R1,R2 


{SEE IF UNEXPECTED ERRORS 


2?55 


0066/0 


001402 








BEQ 


LT23X 


{IF NOT: BR 


2356 


006672 


004737 


015210 






JSR 


PC.LTGER3 


jELSE GO PRINT ERROR 


235/ 


0066 76 


004 73 7 


016600 




LT23X: 


JSR 


PC, ITER 


jGO SEE iF ITERATION 


2358 


006702 


004 737 


015054 






JSR 


PCEORPA 




2.VW 


006 :ot 


00*73/ 


015670 






JSR 


PC.ORVCLR 




2360 


006712 


000137 


002530 






JMP 


TSCD2 


{RETURN TO 5CHED 



MQ9Q6 6 M0915 
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SEU 0062 



23b2 
2363 
2364 












; LOGIC 


TEST 24; DATA BUS 


PARITY ERRORCDPAR)********* 


006 71b 


012737 


025526 


000616 


1 T24: 


MOV 


0MSLT24.EMADDR 


SET TEST HEADER 


£565 


006 724 


012737 


006 732 


000/06 




MOV 


OLT24IHSC0LP 


SET SCOPE ADDRESS 


23hb 


006732 


01273/ 


000005 


000602 


LT24IT: 


MOV 


05.ITAMT 




2367 


006 740 


004/37 


016754 






JSR 


PC.INIT3 


GO INIT, SELECT DRIVE ♦SLAVE 


23b8 


006 744 


052 7 77 


000300 


171570 




BIS 


0300, 3TC 


SET NORMAL FORMAT 


236 li 


006752 


012777 


030204 


171534 




MOV 


OWDATA.SOA 


SET BA 


2370 


006 760 


012777 


1^7760 


171530 




MOV 


o-po.arc 


SET FC 


23/1 


006 766 


012777 


177770 


171516 




MOV 


o-io, awe 


SET WC 


2372 


006774 


012777 


000013 


171532 




MOV 


013,6>MR 


SELECT WAM 2 


23/3 


00 7002 


012777 


000061 


171500 




MOV 


obi.aci 


SET WRITE *fiO 


2374 


007010 


05277/ 


000020 


171502 




BIS 


020, acs 


FORCE EVEN PARITY 


2375 


00 7016 


012 7 01 


000040 






MOV 


040, Rl 


SET TEST WORD 


2376 


00 7022 


012703 


000004 






MOV 


04, R3 




237; 


00 7026 


005000 








Ct.R 


RO 




2378 


00 7030 


005300 






It: 


dec 


RO 




2379 


007032 


001376 








BNc 


1* 


DELAY 


2380 


007034 


005303 








DEC 


R3 




,7381 


007036 


001374 








BNfc 


1$ 




238? 


00/040 


012700 


000004 






MOV 


04, RO 




2383 


007044 


012777 


000013 


171462 


LT^AB: 


MOV 


013, SHR 


CLOCK MP 4 TIMES 


2384 


007052 


005300 








DEC 


RO 




2385 


00 7054 


022700 


000002 






CMP 


02, RO 


SEE IE DONE 1 BYTE 


2386 


007060 


001002 








BNE 


I T24B0 


If NOT; BR 


238 7 


00 7062 


01/701 


171446 






MOV 


3MR.RI 


ELSE GET BYTE 1 


2385 


00 7066 


005700 






LT24B0: 


TST 


RO 


SEE U" BYTE ^ 


2389 


0070/0 


001365 








BNF. 


I T24B 


IF NOT: BR 


2390 


0070 72 


017704 


171436 






MOV 


aMR,R4 


GET BYTE 2 


2391 


007076 


005000 








CL.R 


RO 




2 392 


00 7100 


005500 






LT24C: 


dec 


RO 




2393 


00 7102 


001376 








BNfc 


I T24C 


Dt I At 


2394 


00/104 


0327 7 7 


000040 


171412 




BIT 


040, aER 


SEE IF DPAR IS SET 


2395 


007112 


001023 








BNfc 


LT24D 


IE SO: FIR 


2396 


00 7 U4 


000301 








SwAH 


Rl 




239 7 


007116 


042701 


17 '400 






BIC 


01/7400, Rl 


GE T I OW Bt U 


2 395 


007122 


042/04 


00037 7 






BIC 


03/7.R4 




2399 


007126 


050401 








BIS 


R4.R1 


GET HIGH BY TF 


240C 


00 7130 


005237 


000 740 






INC 


T24H 


SET T24 HAG 


2401 


00 7 1 34 


012737 


027/12 


000666 




MOV 


0TMS22.FRAD0 


SET ERROR CODE 


2402 


00/142 


012737 


000001 


000712 




MOV 


Ol.EXLt. 


SET fcypi } i c> 


2403 


007150 


004 73 7 


015222 






JSR 


PC.LTGERO 


(JO PR INI ERROR 


2404 


007154 


00503 7 


000 740 






Cl.R 


V24KL. 


CLEAR F-TAG 


2405 


00/160 


000412 








BR 


1 T24X 




2406 


00/ib2 


012701 


000050 




LT24D: 


MOV 


,750, Rl 




2407 


00/166 


017 702 


1/1332 






MOV 


u)t R , R2 


GET ERROR REGISTER 


2408 


007172 


042702 


020000 






BIC 


020000 , R2 


MASK OP I 


2409 


00 7 1 76 


020102 








CMP 


R1.R2 


SEE IF UNEXPECTED ERRORS 


2410 


00/200 


001402 








BE.U 


I.T24X 


IE NOT: BR 


2411 


00 7202 


004/37 


015210 






JSR 


PC, I TGER3 


ELSE GO PRINT ERROR 


2412 


00 7206 


042777 


000020 


171304 


LT24X: 


BIC 


020, acs 


RESF T EVEN PARITY 


2415 


00/214 


004/37 


015054 






JSR 


PC.t ORPA 


GO 00 EOR CI EAR 


.'414 


00/220 


004/37 


015670 






JSR 


PC.ORVCl.R 


GO SEE IF DRIVE CLEAR OK 


,■41', 


00 -'224 


004 / 3 / 


016600 






JM 


PC, I If R 


GO SEE U ITERATION 


2416 


00 72 30 


01c' 73 7 


000020 


000602 




MOV 


O.'O, IT AM I 




241? 


007236 


000137 


0Q2530 






JMR 


TSCD2 


.RETURN TO *CHfcQ 



c/ti m.o 


i mo 3 n 


16 I U / .' 


CU I 


MAO 11 


CZTFAl- , 


Pli 06 -APR -84 


09:45 




cMl^ 










0400 










J4.U 










0400 


007040 


010737 


005566 


000616 


0403 


ooro50 


004 737 


016754 




0404 


007054 


050/77 


000300 


171060 


0405 


007060 


010777 


177/77 


1/1006 


J4> 


0070 70 


010777 


000013 


171036 


040/ 


O07076 


010777 


000061 


171004 


0408 


007304 


010701 


004000 




0409 


007310 


017 700 


171010 




04 30 


007314 


030100 






0431 


007316 


001014 






0430 


00 7300 


010737 


007050 


000/06 


04 3? 


007306 


010737 


030000 


000666 


04 34 


007334 


010737 


000001 


000710 


04 3 5 


00/340 


004/3/ 


015000 




04 36 


007346 


000404 






0437 


007350 


000100 






04 38 


007350 


001400 






04 5^ 


00 7354 


004 73/ 


015010 




0440 


00 7360 


004/3/ 


016600 




0441 


007364 


004 737 


015b /O 




0440 


007370 


000137 


000530 
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StQ 0063 



tr05: 
LT05IT 



LT05A; 



LT25X; 



{LOGIC TEST 05j NON -EXECUTABLE FUNCTIONCNF.F )** + ♦ + **♦** 



MOV 4MSLT05.F.MADDR 

JSR PC, TNI T 3 

BIS 4300, a)TC 

MOV *-l,S)FC 

MOV 413,S)MR 

MOV #61.SC1 

MOV #4000, Rl 

MOV 3ER.R0 

BIT Rl.RO 

BNE 1.T05A 

MOV 4LT05IT.SCOLP 

MUV MMS31,ERADD 

MOV 01.EXFL 

JSR PC.LTGERO 

BR LT25X 

CMP Rl.RO 

BEQ I T05X 

JSR PC.L.TGER3 

JSR PC, ITER 

JSR PC.DRVCLR 

JMP T'iCDO 



{SET TEST HEADER 

jINIT, SELECT DRIVE*SLAVE 

j SET NORMAL FORMAT 

l SET ITLLEGAL FC 

j SET WAM 

{LOAD WRITE^GO 

{SET TEST WORD 

j GET ER 

{SEE IF EXPT-RCVD 

;IF 50. OR 

I SET LOOP ADDRESS 

{SET ERROR CODE 

{SET EXPT FLAG 

;G0 PRINT ERROR 

{SEE IF UNEXPECTED ERRORS 
j IF NOT: BR 
jFLSE GO PRINT ERROR 
{GO SEE IF ITERATION 

{RETURN TO SCHED 



CYTEAEO IM05 
CZTKAKPU 



Tt.ib- w:; cu. i 

06-APR-84 09:45 



MS 
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2444 

244 5 
2446 
244 V 

2448 
2449 
2450 
2451 
2452 
2453 
2454 
2455 
24 So 
2457 
2458 
2459 
2460 
2461 
246? 
2463 
2464 
2465 
2466 
246/ 
2468 
2469 
2470 
24 71 
24 72 
2473 
24 74 
2475 
24 76 
24 / 7 
24 78 
24 79 
2480 
2481 
2482 
2483 



00 7 3 74 
00/402 
007406 
007410 
007412 
007414 
007422 
007430 
0074 36 
007444 
00 7452 
007456 
007460 
007462 
007464 
0074 72 
0074 76 
007502 
007504 
007512 
007514 
007516 
007520 
007522 
007524 
007530 
007536 
007544 
007552 
007556 
007560 
007564 
007566 
00/570 
007574 
00/600 
007604 



004 737 
005000 
005300 
001376 
052777 
012777 
012/77 
012777 
012777 
012701 
005000 
005300 
001376 
012777 
105077 
012703 
005000 
032777 
001022 
005300 
001372 
005303 
001370 
017702 
012737 
012737 
012737 
004737 
000406 
017702 
020? )?. 
001402 
004/37 
004 73 7 
004 737 
000137 



025622 
016754 



000300 

177770 
17 7 760 
000013 
000061 
001000 



000025 
171036 
000004 



170774 
007402 
027757 
000001 
015222 

170740 



015210 
016600 
0156/0 
002530 



ShQ 0064 



000616 



171120 
171062 
171060 
171070 
171036 



171042 



000 706 
000666 
000712 



1.126: 
LT26IT 

1$: 



2$ 



001000 171012 3$: 



4$: 



LT26X: 



S LOGIC TEST 26: FRAME COUNT ERRORC FCE )*■*■* ******* 



MOV #MSLT26,EMADDR 

JSR PC.INIT3 

CI..R RO 

DEC RO 

BNE 1$ 

bis #3oo, arc 

MOV #-lC,aUC 

mov #-20, arc 

MOV t>13,3MR 

MOV #6i,aci 

MOV #1000 ,R1 

CLR RO 

DEC RO 

BNE 2$ 

MOV #25,a)MR 

CLRB SMR 

MOV 44, R3 

CLR RO 

BIT #1000, SER 

BNE 4$ 

DEC RO 

BNE 3$ 

DEC R3 

BNE 3$ 

MOV 3ER.R2 

MOV #LT26IT,SC0i 9 

MOV #TMS28,ERADD 

MOV #l,EXFl. 

JSR PC.LTGERO 

BR LT26X 

MOV 3ER.R2 

CMP R1.R2 

BEQ LV26X 

JSR PC.LTGER3 

JSR PC, ITER 

JSR PC.DRVCLR 

JMP TSCD2 



jSFT TEST HEADER 

;INIT, SELECT DRIVE^SLAVE 



{AWAIT OPI RESET 
SET NORMAL FORMAT 
SET WC--10 
SET FT- -20 
SET WAM 3 
LOAD WRITE »G0 



SET TEST WORD 



{DELAY 

{LOAD MM EOR CLEAR 

{RESET MR 



{SEE IF FCE SET 
j IF SO: BR 

{DELAY 



jGEl ER 

{SET SCOPE ADDRESS 

{SET EXPT FLG 

{GO PRINT ERROR 

{GET ERROR REGISTER 

;SEE H UNEXPECTED ERRORS 

jl* NOT; BR 

5 El SE GO PRINT ERROR 

jGO SEE IE ITERATION 

{RETURN TO SCHED 



Nr. 
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vM8S 










248* 










248/ 










2488 


007610 


022757 


172400 


000510 


24»Q 


00 7616 


001041 






2490 


00/620 


012737 


007644 


000 706 


2491 


00/626 


01273/ 


025656 


0C0bl6 


.MS, 1 


00 7654 


012700 


000020 




."495 


00/640 


012701 


1724 34 




2494 


007644 


004 73/ 


016 754 




2495 


0076*30 


OHIO? 






J 4 9b 


00 >52 


032777 


000002 


1 70644 


249 7 


i-o '<?60 


001010 






24^8 


00/662 


012737 


000001 


000/12 


2499 


007670 


01273/ 


027601 


00066b 


2'jOO 


00 /6 7b 


00473/ 


015230 




2501 


oo / t o^ 


001)300 






2502 


00/704 


001402 






2503 


007 706 


00S/21 






2504 


00/710 


000/55 






2505 


00// 12 


004/3/ 


016600 




250t» 


00 7 716 


004 737 


0156/0 




2507 


007722 


000137 


002530 





LT27 



I T27IT 
LT2/A: 



L T27P: 



I 12 /X; 
LT27XX: 



i LOGIC 


TEST 27: ILLEGAL 


CMP 


4172400.C1 


BNF. 


I.T27XX 


MOV 


i>[ T27A.GC0LP 


MOV 


4MSLT27,EMADDR 


MOV 


420, RO 


MOV 


4172434. Rl 


JSR 


PC.lNlTa 


MOV 


CRD.R3 


BIT 


02.SER 


DNF 


LT270 


MOV 


*i,Exn. 


MUV 


4TMS10.ERADD 


JSR 


PC.LTGER 


Df-C 


RO 


BfcU 


I T2/X 


tst 


(Rl)» 


RH 


I T2/A 


JSR 


PC, IUR 


JSR 


PC.URVCLR 


JMP 


tsck? 



SEQ 0065 



TESTS 



REGISTERCILR )♦♦***♦*♦♦♦ 

j SEE IF ADDRESSES OPEN 

i IF NOT: BR 

{SET SCOPE ADDRESS 

j SET TEST HEADER 

I SET NUMBER OF IL.R 

jSET FIRST ILR 

GO INIT. SELECT DRIVE+SLAVE 

/ATTEMPT II R READ 

SEE IF" ILR*1 

IF SO: BR 

SET EXPT-NOT RCVD FLAG 

SET ERROR CODE 
jGO PRINT ERROR 
j SEE IF DONE ALL 
;IF SO: BR 
j BUMP ADDRESS 
i CONTINUE TEST', 
{GO SEE IF TTl RATIONS 

{RETURN TO SCHED 



C/TMI-0 TM03 
250"* 

,:mo 
Ml 
2512 

2513 
2514 

2515 

2Mb 

;m : 
:sin 

251* 
2520 

2521 
2522 

2523 
2524 

2525 

252b 

252 ' 

2528 
252<* 

2530 
2531 
2532 
2533 
2534 
2535 
2536 

253 ' 
2b 38 
253M 
2540 

254 i 
254 c' 
254 5 
2544 
254 5 



H lb K'7 7 CTl t 
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W ■ 
PAW. 



S« 



SEQ 0066 



>4b 
254 7 
254 rt 
254'* 
.'550 
2551 
2552 



2555 

2556 
255 7 
2558 
255'* 

2560 
i'5M 
256.- 



00 7 726 
00.'; 34 

oo;?42 

00/750 
00 7 754 
00 7 762 
00 7 766 
007 7 74 
010000 
01000b 
010014 
010016 
C10024 
010030 
010034 
010042 
010046 
010052 
010060 
010066 
010072 

010076 
010100 
010102 
010104 
010110 
010114 
010120 
010124 
010130 
010132 
010140 
01014b 
010150 
010152 
010154 
010162 
010164 
01017^ 
010176 
010200 
010204 
010210 
010214 
010216 
010220 
010224 
010. '30 
010214 
010240 



012737 
012737 
012737 
004 73 7 
052777 
012701 
012777 
0050 7 7 
012777 
032777 
001005 
012737 
004737 
004737 
05277 7 
012701 
0050 7 7 
012777 
012777 
012704 
005777 
100015 
005300 
001373 
013704 
004 737 
012704 
004737 
004 73 7 

0004 35 
012777 
012777 
005000 

005 300 
001376 
032777 
001006 
012737 
004 737 
0OO412 
012701 
017702 
042702 
020102 
001402 
004 1 3 7 
004 73 7 
004 73 7 
004 ' 3 7 
000117 



030006 
025712 
007750 
016 754 
000300 
010000 
000017 
170516 
00006 :. 
010000 

000001 
015222 
016754 

000300 
010000 
1 70444 
0O0015 
000061 
040000 
170444 



000616 

017760 
023125 
017 760 
016550 

000015 
000015 



010000 

00000 1 
015222 

010000 

1 70514 
020100 



015210 
016600 
015054 
015*. 70 
002530 



000666 
00061b 
000706 

1 70560 

1 70540 

1 70502 

170510 

000712 
170500 



1 70454 
170422 



1 70 3 74 
170366 



1 70342 
000/12 



I T30: 

LT30I 



LT30A 



IT BOB 



LT30C 
L T30D 



I.T30E: 



I MOX| 



lLOGIC TEST 30? DRIVE. TIMING ERROrt* ♦♦ ♦♦♦♦♦♦* 



MOV 0TMS3>,ERADD 

MOV 0MSLT30.EMADDR 

MOV •lTSOIT.SCOLP 

JSR PC.IMT3 

bis osoo.btc 

MOV #10000. Ri 

MOV 017.IDMR 

CLR 8FC 

MOV 061.UC1 

BIT 010000, BfR 

BNE IT 30 A 

MOV Ol.EXfl. 

JSR PC.ITGERO 

JSR PC. INI T 5 

BIS 0300. BIC 

MOV 10000, R I 

CLR Bf'C 

MOV 4/15.BMR 

MOV 061, BC1 

MOV 040000 ,R4 

TST QTC 

bpl l t ioc 

dec ro 

BNE I T 308 

MOV EMA00R.R4 

JSR PC, T TOUT 

MOV 0MS'j50.R4 

)SR PC, T TOUT 

JSR PC, SCOPE 

BR I T 30X 

MOV 015, BMR 

MOV 015. BMR 

CLR RO 

UfC HO 

BNE L MOD 

BIT 010200, BE H 

BNf I MOE 

MOV Ol.fr.XU 

JSR PC, i- TGtRO 

MR I T30x 

MOV 01 0000, HI 

MOV BER.R2 

BIC 020100 ,R2 

CMP H1.R2 

ui o i r iox 

jsh pc, i rui h< 

JSR PC, I MR 

i'»H PC.FORPA 

J l M PC.DRVCLR 

JMP T5C02 



St AVE 



SET ERROR CODE 

SET TEST HEADER 

SET SCOPE ADDRFSS 

INIT, SELECT DRIVfc 

SET NORMAL FORMAT 

SET TEST WORD 

CRIPPLE OCCUPIED 

M-T EC3 

LOAD WRITt ♦GO 

SEE If DTE St T 

V SO: BR 

SET EXPT FIG 

CO PRINT ERROR 

GO INIT SELECT DRlVt ,51 AVE 

SET FORMAT 

SET TEST WORD 

SfT ECS 

SET WRAP 3 

I OAD WRIfh .tiO 

Sfrf: IE Al PMA 

AWAIT Al PHA 



jPRINT HtADtR 

j PR INT Al PHA (RROR 



iCl OCh MR 
j CI 0O< MR 



I OH Ai 

isn n on sit 

i!.f SO: OR 

r'ii r mpt mi 

I GO PRINT ERROR 

I St T TE ST WORD 

iGE I ERROR RtGIsrtH 

I MASK OP I ANO VHfr 

iStE IF UNEXPECTH) i RROR 

I IE NOT; HR 

iFl St GO PRINT *HROH 

iGO SM IF Ml RAT ION 

I GO Cl \ AH i,0 HIT 

jHI TURN TO SCHH) 



o. 



C.Mt AlO 


:M05 IE lt» U'.V 


CM 1 


MAC1 11 


30( 1046) 


06 APR 


84 09} 48 PAlifc 59 


cm At , 


Pi I 06 APR 84 


09} 45 












2S*4 














• 




25<> : 












(LOGIC 




010244 


012737 


025750 


000616 


l.TMt 


MOV 


0MSLT3t,EMADDR 


SET TEST HEADER 


2S*a 


010252 


012737 


010252 


000 70* 


LT311T: 


MOV 


0LT31IT,SC0LP 


SET SCOPE ADDRESS 


2**9 


0102*0 


012737 


030022 


000*66 




MOV 


0TMS33A.ERADD 


SET ERROR MSG HDR 


25 70 


01026* 


012 73 7 


000002 


000602 




MOV 


02.ITAMT 


SET REDUCED ITER COUNT 


25 *i 


0102 74 


004 73 7 


016754 






JSR 


PC.INIT3 


INIT, SELECT DRIVE •SLAVE 


25 v 


010300 


005000 








Cl.R 


RC 




^s:? 


010302 


005300 






1*1 


otc 


RO 




2574 


010304 


0013 76 








BNE 


If 


AWAIT OP I RESET 


25 ?5 


01030* 


052 7 7 7 


000300 


1 7022* 




BIS 


0300, 8TC 


SET FORMAT 


*?57fr 


010314 


012777 


000013 


170212 




MOV 


O13.0MR 


SET WAM 2 


257^ 


010322 


00507 7 


170170 






Cl.R 


arc 


SET ERAME COUNT 


25 :« 


01032* 


012705 


020000 






MOV 


020000, R5 


SET TEST BIT (OPI ) 


25 -*» 


010332 


012702 


010350 






MOV 


02$, R2 


SET RETURN ADDRESS FROM TIMER 


2580 


01033* 


004737 


010550 






JSR 


PC.TIMON 


START TIMER 


2581 


010542 


012777 


0000*1 


170140 




MOV 


0*1, SCI 


LOAD WRITE *GC 


2582 


010350 


0505 7 7 


170150 




2$: 


BIT 


R5.QER 


BRANCH WHEN OPI SETS 


2583 


010354 


001002 








BNf 


3$ 




25.84 


010356 


000163 


010642 






JMP 


TII1tR(R3; 


00 TO TIMER 6 RETURN TO 2$ AB 


258!? 


010362 


017 702 


170136 




3Sj 


MOV 


BER.R2 


GET ERROR REGISTER 


2586 


01056* 


020502 








CMP 


R5.R2 


SEE ir UNEXPECTED ERRORS 


258 ' 


010570 


001405 








BF.Q 


41 


V NOT; BR 


2588 


010372 


004 73/ 


015210 






JSR 


PC, I TGER3 


El SE PRINT ERROR 


2589 


01037* 


000453 








BR 


L T51X 




2590 


010400 


004 73/ 


010734 




4$j 


JSR 


PC.riMOK 


00 CHECK TIME FOR OPT U SE I 


2591 


010404 


102450 








BvS 


I.T31X 


BRANCH If TIME WAS INCORRECT 


1- —* 't. 

2595 


01040* 


012737 


010422 


000 70* 




MOV 


Oi TS1A,SC01P 


SET SCOPE LOOP 


2594 


010414 


01275? 


030036 


000666 




MOV 


OTMS33B.fc.RAOD 


SE T ERROR MSG HEADER 


2595 


010422 


004/37 


016754 




LMlAi 


JSR 


PC.IN1T3 


GO INIT 


259* 


01042* 


005000 








CLR 


RO 




259? 


0104 30 


005300 






1*: 


DEC 


RO 


WAIT y OR OPI TO CLEAR 


2598 


010432 


0013 76 








BNE 


U 




2599 


0104 34 


052777 


000500 


l 70100 




BIS 


0500, tfTC 


SE 1 1 ORMAT 


2*00 


010442 


012777 


0000 1 5 


1 70064 




MOV 


015, &JMR 


SET WRAP 5 


2*0 i 


010450 


012702 


0104 \? 






MOV 


02I.R2 


SET RETURN ADDRESS KROM TIMER 


2602 


C10454 


012705 


020000 






MOV 


020000. R5 


SET TEST WORD 


2*0 5 


0104t>0 


004757 


010550 






JSR 


PC.TIMON 


START TIMER 


..'604 


010464 


012777 


0000 7 1 


170016 




MOV 


• / 1 , ac l 


I OAO READ ♦GO 


2605 


0104 72 


03057 7 


1 /0026 




2$: 


BIT 


RS.itf R 


BRANCH WHEN OPI SE IS 


2606 


010476 


001002 








BNF 


31 




2*0 ? 


010500 


000163 


010642 






JMP 


TIMERlRll 


00 TO TIMER 


2608 


010504 


017702 


170014 




3$: 


MOV 


o»f R.R2 


OE T ERROR REGISTER 


2609 


010510 


020502 








CMP 


RS.R2 


SEE W UNEXPECTED ERRORS 


2M0 


010512 


001403 








Bf Q 


4t 




2611 


010514 


004 73 7 


015210 






JSR 


PC J TG*R3 


El SE PRINT ERROR 


2612 


010520 


000402 








BR 


I T31X 


EXIT TEST 


2613 


010522 


004 73? 


010734 




41 : 


JSR 


PC. T 1M0K 


00 CHECK TIME 


2*14 


010526 


004/57 


016600 




\ MlXt 


JSR 


PC: 1 TE R 


00 SEE U ITERATIONS 


2615 


010532 


004 73 7 


015*70 






JSR 


PC.DRVCI R 




2616 


0105 36 


0127?/ 


000020 


000602 




M(JV 


020, I TAMT 




«'*i " 


010544 


000137 


0025 50 






JMP 


J5CD2 


RE K>RN TO sChEO 


i ■ « .i 
2619 










j ROUT IN 


[ ro ST A 


RT THE TIMER. THE 


UMhR IS AN OSril 1 AMIR IN » HE 



SEO 0067 



c:n At o 


!M03 II 


it. \v:: 


eu i 


2m v 


PI I 06 -APR 84 


09j45 


2621 
2622 

2623 


010550 


005000 




2624 


010552 


005001 




2b25 


010554 


01270? 


000024 


2626 


010560 


032 77 7 


000100 


262 : 


010566 


001405 




262a 


010570 


032777 


000100 


262^ 


01057b 


00 I 5 74 




2630 


010600 


000405 




u>?i 








2632 


010602 


00540? 




.0655 


010604 


032777 


000100 


2634 


010b 12 


0017 74 




J!6S5 


010614 


000207 




26 3t* 








.^5 .* 








2638 








2659 








2640 








2641 


010616 


032777 


000100 


2642 


010624 


001406 




264 3 


010626 


000112 




3644 




010642 




2645 


010642 


005403 




2646 


010644 


062 700 


000001 


264 7 


010650 


005501 




2648 


010652 


022/01 


000003 


2649 


010656 


001410 




2650 


010660 


000112 




2651 




010666 




2652 


010666 


032777 


000100 


265 5 


010674 


001362 




2654 


010676 


000112 




2655 








2656 


010700 


013704 


000616 


2657 


010/04 


004 737 


017 760 


2658 


010710 


013704 


000666 


2659 


010/14 


004 757 


017 760 


2660 


010720 


012/04 


030116 


266 1 


010724 


004 73/ 


017 760 


2662 


010730 


000137 


010526 


266 3 








2664 








2665 








2666 








266 ; 








2668 








2669 


010/54 


000240 




26/0 


010/36 


006^01 




26/1 


010/40 


006000 




26 U 


010/42 


006201 




26.'», 


010/44 


006000 




26/4 


010/46 


006201 




£675 


010750 


006000 





MACU1 30(1046) 06 APR 84 09;48 PAGE 59 1 



I k NANCE. REGISTER (BIT 6) THAT TOGGLES EVERY 
{ROUTINE WAITS FOR THF OSCIll.ATOR TO TOGGLE 
iTHF. STATK OF THF OSCILLATOR, 



167 746 



167 722 



167710 



SEQ 0066 



56 CIO) MICROSECONDS. THIS 
AND RETURN WTTH R3 INDICATING 



TlMONt 



16/736 1$ 



2 J 
3$ 

4* 



CLR 


RO 


CI R 


Rl 


MOV 


024, R3 


BIT 


(HOO.SMR 


BEQ 


2$ 


BIT 


0100, alMR 


BNE 


\% 


BR 


4$ 


NFG 


R3 


BIT 


frlOO.OMR 


BE a 


3$ 


RTS 


PC 



1 CLEAR TICK COUNT 



i PRESET 
I BRANCH 



INOFX TO TIMF.R 
IF OSC CI FAR 



I WAIT FOR OsC 

\\ XIT 

I SET INDFX '0 
iWAIT FOR OJC 

{RETURN 



TO CLEAR 



TIMER 
TO SET 



{THIS ROUTINE TIMES AN EVENT, EACH TIME THE OSCILLATOR BIT CHANGES 
iSTATfc THE TICK COUNT IN Rl 6 RO IS INCREMENTED, THE ROUTINE IS CALtED 
t USING R3 AS AN INDEX TO INDICATE. THE OSCIUATORS PAST STATE. WHEN 
CHANGES STATE R3 IS NEGATED. 

{BRANCH IF OSC HAS CHANGED STATE 



j THE OSC BIT 
TIMERls BIT 



BEQ 

JMP 



©100, SMR 

TIMER 
(R2) 



TIMER: 



IMER1.24 



RF TURN 



167640 TIMERO: 



T I MOVE 



NEG 
ADD 
ADC 
CMP 
BEQ 
IMP 

.-TIMER 
BIT 
BNE 
JMP 

MOV 
JSR 
MOV 
JSR 
MOV 
JSR 
JHP 



R? 

*1,W0 

Rl 

03, Rl 

T IMOVF 

(R2) 

»24 

0100, q)MR 

TIMER 

(«2) 

EMADDR.R4 

PC, T TOUT 

ERADD.R4 
PC, T TOUT 
♦TMS35E.R4 
PC. (TOUT 
I T31X 



j SET INDEX 
l INCREMENT 



TO OTHER STATE 
TICK COUN T 



{BRANCH IF TIMER OVERFLOWS 

I RE TURN 

j BRANCH IF USC SET 



RETURN 



iRUUTINE 

j WITH THE 



TO CHECK 

• v nn 



V TIME 
SF T . THE 



»IN MICROSECONDS B» 
{ 1HF UPPER 1 tMIT I', 
5 56 USE.CS -'TICK TIME' 
UMOKj NOP 

ASR Rl 
ROR RO 
ASH Rl 
ROM HO 
A'.W U\ 
ROW RO 



|T tPE H.ST HEADER 

I GET FRROR MSG ADORE SS 

j AND TtPE H 

l T i PE 

{TIMER OVER* I OWED' 

{GO EXIT TEST 

WITHIN LIMITS. \f NUT THE ROUTINE 
IMITS WERE SLECTED Br DIVIDING rnt 



44W. THE I OWER LIMIT 
9,500,000 USECS t'^,5 
• THE DIVISION HI 8 HI THE T IMt.lt 



IS 5,500.000 U 
SEC.). THE 44ri 



JECs 
is I 
ROUTINE 



RETnRNS 
TIME 
(5.5 SECS ^j 
H-RIVED FROM 



{DIVIDE COUNT Hi 8 



C/Tl-Al-0 


1N05- n u, iu;; 


CU I 


cin-m , 


Pll 06 -APR 84 


09:45 


£t> /6 


010 752 


013701 


001010 


£6/7 


010756 


006301 




."6 «'8 


010760 


020061 


011064 


£t>79 


010764 


101016 




£680 


010766 


013704 


000616 


£t>81 


01077? 


004 737 


017760 


^8J 


010776 


013704 


000666 


£i>85 


01100? 


004 737 


017760 


£684 


011006 


012704 


030051 


£685 


011012 


004 737 


017760 


£686 


011016 


000262 




£08 ; 


0110£0 


000420 




£638 








£689 


0U0££ 


020061 


011070 


£690 


011026 


003415 




£691 


011030 


013704 


000616 


£692 


011034 


004737 


017760 


£6<»3 


011040 


013704 


000666 


2694 


011044 


004 73 7 


017760 


£695 


011050 


012704 


030073 


2696 


011054 


004737 


017760 


2697 


011060 


000262 




£698 


01106£ 


000207 




£69^ 








£'"00 








£701 








£702 








£703 


011064 


0? 7 7 64 




£704 


011066 


020622 




£ 70S 








£ 706 








£ 70 ' 


011070 


051325 




£708 


011072 


034774 





MACU1 30C 1046) Ob APR 84 



Hi 

0^:48 PAGE 59 £ 



1$ 



MOV 

A SI 

CMP 

BHI 

MOV 

JSR 

MOV 

JSR 

MOV 

JSR 

SEV 

BR 

CMP 
Bl-F. 

MOV 
JSR 
MOV 
JSR 
MOV 
JSR 
SEV 
RTS 



5LVTYP.R1 
Rl 

R0.200UR1) 
It 

EMADDR.R4 

PC.TTOUT 

ERADD.R4 

PC.TTOUT 

3TMSS3C.R4 

PC.TTOUT 

£t 

RO,201S(R1) 

?t 

EMADDR.R4 

PC.TTOUT 

bRADD.R4 

PC.TTOUT 

OTMS33D.R4 

PC.TTOUT 

PC 



SEQ 0069 



t**B GET SLAVE TYPE CO/1 * TE16/TU77) 

j »*B FORM INDEX 

j^B BRANCH If GREATER THAN LOWER LIMITCb.5 SECS) 

I GET ERROR MSG HEADER 
jTyPE ERROR MSG HEADER 
I GET ERROR DESCRIPTOR MSG 

(TYPE 'OCCUREO TOO SOON* 

jSET 'V TO INDICATE ERROR 

l»»B BRANCH IF [ESS THAN UPPER LIMITC9.5 SECS) 
I GET ERROR MSG HEADER 



j TYPE ERROR MSG HEADFH 
I TYPE 'OCCURED TOO LATE' 



;*»B TABLE OF MIN AND MAX TIMES FOR OP I FOR TE16 AND TU?? SLAVES 
; ..B MIN TIMES (5.5 SfcCS) 

200$: .WORD 12276. ;».B TE. 16 

.WORD 8594, j*»B TU77 



j ..B MAX TIMES (9,5 SECS) 
£01 J i .WORD £1£05. 
.WORD 14844, 



l»»H It 16 
i»»B TU'7 



c/u/uo mo 5 

CZTtAt.Pll 



0*10 

711 

0:10 

713 
0714 
0'15 



n i^ u>;: cu i 

06-APR-84 09*45 
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716 
0717 
71$ 
071* 
700 

'01 

».■»-».-* 
».-: « ti'. 

070? 

704 

0'05 

V6 

? 7 V 

708 
709 

0730 
0731 
732 
733 
734 
735 
0736 
73 7 
7 38 
0759 
0740 
74 1 
0^40 



011074 

01UOO 

011110 
011114 

011100 
011104 

011130 
011134 
011140 
01114^ 
011146 
011150 
011156 
011164 
011166 
011174 
011000 
011000 
011004 
011210 
011000 
011004 
011006 
011030 
011032 
011036 
011040 
011046 



010737 
010737 
004737 
013700 
010701 
030/77 
001402 
052701 
005100 
042 700 
050 700 
010077 
030777 
001030 
010777 
017700 
030100 
001011 
010737 
01273 7 
004737 
000404 
020100 
001402 
004737 
004 73 7 
004 737 
000137 



006004 
011110 
016754 
000660 

040000 
000004 

004000 

177770 
000300 
167364 
000000 

000071 
167324 



030156 
000001 
015202 



015010 
016600 
015670 
000530 



SEQ 0070 



00061b 
000706 



167404 



L.T30: 
LT32IT: 



1$ 



167350 

167314 



000666 
000710 



2$ 



LT30X: 
LT30XX: 



{LOGIC TEST 30: UNSAFECUNS)********** 



MOV 

MOV 

JSR 

MOV 

MOV 

BIT 

BEQ 

BIS 

COM 

BIC 

BIS 

MOV 

BIT 

BNE 

MOV 

MOV 

BIT 

BNE 

MOV 

MOV 

JSR 

BR 

CMP 

BEQ 

JSR 

.ISR 

JSR 

JMP 



4MSLT30.EMADDR 

4LT32IT,SC0l.P 

PC.INIT3 

SLVN.RO 

440000, Rl 

44, SOT 

1$ 

44000, Rl 

RO 

4177770, RO 

4300.R0 

R0.3TC 

42000, o)0T 

LT32XX 

471, SCI 

3ER.R2 

R1.R2 

0* 

4TMS34.ERADU 

41,EXFL 

PC.LTGERO 

LT30X 

R1.R2 

I.T32X 

PC.LTGER3 

PC .ITER 

PC.DRVCLR 

TSCOO 



SET TEST HEADER 

SET SCOPE ADORESS 

INIT, SELECT DRIVE ♦SLAVE 

GET SLAVE NUMBER 

SET TEST WORD (UNS) 

BRANCH IF TE16 



**B 
-B 

♦ ♦B 

♦ ♦B SET ALSO NEF FOR TU77 
SET NONEXISTANT SLAVE 
MASK 
SET 
SELEl 
EXIT TEST IF SALVE AVAILABLE 



SLAVE NUMBER 
FORMAT 
XT ILLEGAL Sl.AVfc 



LOAD READ -GO 
READ ER 

SEE IF EXPT^RCVD 
IF SO: BR 

SET ERROR CODE 
SET ERROR CODE 
GO PRINT ERROR 

SEE If UNEXPECTED ERRORS 

IF NOT; BR 

ELSE PRINT ERROR 

GO SEE IF ITERATIONS 

RETURN TO SCHLO 



CThAhO TM05-Thit> K'/7 CH. 1 
CZTMKP11 Ob* APR -84 09:45 

2744 
2 745 
J 74 b 
2 --4 / 
J ."48 
2 749 

2750 

2 751 
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2 752 
2 75? 
2754 
2755 
2 756 
2757 

2 758 
?759 
2-'b0 
2 761 

J 762 

276? 
2764 



011252 

011260 
011266 
011272 
011300 
011306 
011314 
011322 
011324 
011332 
011340 
011344 
011350 



012737 
012737 
004 737 
012777 
012777 
012777 
0327 7 7 
001010 
012737 
01273/ 
004737 
004 737 
000137 



026040 
011266 

016 754 
000013 

17 7 7 7 7 
000031 
020000 

027631 
000001 
015222 

016600 
002530 



SfcQ 00 71 



0006 1 6 
000706 

167234 

167210 
167174 
167200 

000666 
000712 



LT33: 



j THt FOLLOWING 6 TESTS WILL LOOK AT VARIOUS BITS IN THF. 
{DRIVE STATUSCDS) AND TAPE CONTROLC TO 
{REGISTERS BY FORCING CERTAIN CONDITONS WHICH DO NOT 
{REQUIRE TAPE MOVEMENT. 

{LOGIC TEST 33: POSITIONING IN PROGRESSC PIP )♦*++***♦ ♦+ 



MOV 
MOV 

LT33IT: JSR 
MOV 
MOV 
MOV 
BIT 
BNE 
MOV 
MOV 
JSR 

LT33X: JSR 
JMP 



OMSLT33.EMAODR 
*LT33IT,SC0LP 
PC.INIT3 
013,S)MR 

*-l,af"C 

031, aci 
020000, aos 

I.T33X 

0TMS14.ERADD 

Ol.EXKL 

PC.LTGERO 
PC, ITER 
TSCD2 



{SET TEST HEADER 

{SET SCOPE ADDRESS 

iINIT, SELECT DRIVF.»SLAV£ 

{SET WAM 2 

{SET res 

{LOAD SPACE FORWARD*GO 
{SEE It PIP-1 

{IF SO: BR 

{SET ERROR CODE 

{SET ERROR CODE 

{GO PRINT ERROR 

j GO SEE IF ITERATIONS 

{RETURN TO SCHED 



CMtrtt.O 


1N03 rt lb IU/7 


cn i 


MACY11 


30(1046) 


06 -APR 


-84 09; 48 PAGE 


62 


CZTEAt-. 


PI I 06 APR 84 


09t45 












2 ?** 

2 ■>. : 
2768 
2 ?** 












{LOGIC 


TEST 34 1 PHASE ENCODED STATUSCPES ) + ♦♦ + + * 


011354 


012737 


027551 


000666 


I.T34: 


MOV 


#TMS6,F.RADD 


j SET ERROR CODE 


27 70 


011362 


012737 


026074 


000616 




MOV 


tfMSLT34,EMADDR 


j SET TFST HEADFR 


:^i 


011370 


012700 


000004 




I.T34IT: 


MOV 


*4,R0 




A 'J ■» t 
C. I it. 


011374 


004 737 


016754 




LT34A1; 


JSR 


PC.INIT3 


{GO INIT, SELECT DRIVE* 


J 7 73 


011400 


042777 


003400 


167134 




BIC 


v3400,aTC 


{SELECT NR^I 


2 7 74 


011406 


052777 


001400 


167126 




BIS 


01400. QTC 




27 75 


011414 


032777 


000040 


167100 


L.T34A: 


BIT 


040, SOS 


{SEE IF PES-0 


2 7 76 


011422 


001410 








BEQ 


LT34B 


j IK SO; BR 




011424 


012737 


000002 


000712 




MOV 


42.EXEL 


{SET RCVD-NOT E; ;'T 


27 73 


011432 


012737 


011374 


000706 




MOV 


0LT34A1.SC0LP 


{SET SCOPE Af>i>iu-5S 


T7"70 


011440 


004737 


015222 






JSR 


PC.LTGERO 


{GO PRINT ERROR 


2 780 


011444 


004 737 


016770 




LT34B: 


JSR 


PC.INIT4 




2 '81 


011450 


032777 


000040 


167044 


LT34C: 


BIT 


040, SOS 


{SEE IE PES-1 


2 7 82 


011456 


001010 








BNE 


LT34X 


{IE SO: BR 


2 783 


011460 


012737 


011450 


000 706 




MOV 


0LT34C.SCOLP 


{SET SCOPE ADDRESS 


2 784 


011466 


012737 


000001 


000712 




MOV 


Ol.EXKL 


{SET EXPT-NOT RCVD R.AG 


2 785 


011474 


004737 


015222 






JSR 


PC.LTGERO 


iGO PRINT ERROR 


J 766 


011S00 


004737 


016600 




L.T34X: 


JSR 


PC, ITER 


{GO SEE IF ITERATION 


2787 


011504 


000137 


002530 




LT34XX; 


JMP 


TSC02 


{RETURN TQ SCHEO 



SEQ 0072 



SLAVE 



C/THUO INOS 
«ThAl-.PU 



2 7t?9 

2:91 
2792 

2793 
2794 

2795 



n ib iu:: cil i 

06 APR 84 09; 45 



16 
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2796 

27*; 

2 798 

J" 799 
2800 

2801 
2802 
2803 
2804 
2803 
2806 
280 7 
2808 
2809 
2810 
2811 
2812 
2613 



011510 
011516 
011524 
011550 
011536 
011540 
011546 
011554 
011562 
011570 
011572 
011600 
011606 
011612 
011616 
011622 
011630 
011632 
011640 
011646 
011652 
011656 



012737 
012737 
004737 
032777 
001374 
052777 
012777 
012777 
032777 
001410 
012737 
012737 
004737 
004737 
005277 
032777 
001010 
012737 
012737 
004737 
004737 
000137 



030161 
026130 
016754 
000020 

000300 

000015 
000071 
020000 

000002 

011524 

015222 
016754 
166720 
020000 

011612 

000001 
015222 
016600 
002530 



SEQ 00 73 



000666 
00061b 

166764 

166774 
166760 
166726 
166752 

000712 
000706 



166712 

000706 
000712 



LT35: 

LT35IT; 
l*i 



LT35A: 



{LOGIC TEST 35: SLAVE ADDRESS CHANGE. (SAO********** 



LT35X; 



MOV 0TMS3/.ERADD 

MOV 0MSLV35,EMADDR 

JSR PC.INIT3 

BIT 020, QDS 

BNE 1$ 

BIS 0300, 3TC 

MOV 015,S)MR 

MOV 071, IDC 1 

bit 020000, arc 

BEQ I.T35A 

MOV 02,EXR 

MOV 0LT35IT.SCOLP 

vJSR PCLTGERO 

JSR PCTNIT3 

INC STC 

BIT 020000, aTC 

BNE LT35X 

MOV 0LT35A,SCOLP 

MOV 01.EXR. 

J5R PCLTGERO 

JSR PC .ITER 

JMP TSCD2 



iINIT SELECT DRIVE, SLAVE 

{SEE IE SDWN IS RESET 

{IF NOT; BR 

{SET FORMAT 

;SET WAM 3 

{LOAD READ*GO 

;SEE IF SAC-0 

{IF SO: BR 

{SET RCV-NOT EXPT FLAG 

jSET SCOPE ADDRESS 

{GO PRINT ERROR 

jINIT 

{BUMP SLAVE ADDRESS 

{SEE IF SAC'l 

{IF SO: BR 

{SET SCOPE ADORES -j 

jSE EXPT -NOT RCVD FLAG 

;G0 PR TNT ERROR 

{RETURN TO SCHED 



Jf. 



C/TI.AI-0 TN03-TE16.'RJ.V CU. I 
C2TEAE.P11 06 -APR -84 09; 45 



MAO 11 30(1046) 



AS IS 










28 It* 










28 1; 










2818 


011662 


012737 


026175 


000616 


281^ 


011670 


012737 


030167 


000666 


2820 


011676 


004737 


016754 




2821 


011702 


032777 


040000 


166632 


2822 


011710 


001410 






282? 


011712 


012737 


011676 


000706 


2824 


011720 


012737 


000002 


000712 


2825 


011726 


004 737 


015222 




2826 


011732 


004737 


016754 




282? 


011736 


0050 7 7 


166554 




2828 


011742 


0327 7 7 


040000 


166572 


2829 


011750 


001010 






2830 


011752 


012737 


011732 


000706 


2831 


011760 


012737 


000001 


000712 


2832 


011766 


004 737 


015222 




2833 


0117 7.* 


004 ? 3 7 


016600 




2834 


011776 


000137 


002530 





L ! 36 ; 
LT36IT 



IS 



LT36X: 



06 APR 


-84 09;48 PAGE 


64 


I LOGIC 


TEST 36: FRAME COUNTER STATUSCFCS )*+*+*++* 


MOV 


0MSLT36.EMADDR 




MOV 


OTMS38.ERADD 


j SET ERROR CODE 


JSR 


PC.INIT3 


iINIT. SELECT DRIVE* SLAVE 


BIT 


040000, S)TC 


jSEE IF FCS«0 


BEQ 


1$ 


iIF SO: BR 


MOV 


OLT36IT,SC0LP 


{Set scope: address 


MOV 


02.EXFL 


{SET RCVD-NOT EXPT 


JSR 


PC.LTGERO 


j GO PRINT ERROR 


JSR 


PC.INIT3 


jINIT 


CLR 


arc 


i WRITE TO FC 


BIT 


440000, 3TC 


j SEE IF FCS»1 


BNF. 


LT56X 


i IF SO: BR 


MOV 


#1$ ( SC0LP 


j SET SCOPE ADDRESS 


MOV 


#1,EXFL 


{SET EXPT-NOT «CVD 


JSR 


PC.LTGERO 


jGO PRINT ERROR 


JSR 


PC, ITER 




JMP 


TSCD2 


•RETURN TO SCHtD 



SEQ 00 74 



\/ 



e/n -Aho 


IM03-U 


16 IU// 


Clt I 


MACYU 


30C1046) 


06 APR 


-84 09 {48 PAGE 65 


CZTF.Af . 


Pit 06-APR-84 


09:45 












2856 


















2837 
2838 
283'} 












j LOGIC 


TEST 57: ACCELERATIONCACCL)********** 


012002 


012757 


026242 


000616 


L.T37: 


MOV 


^MSLF3 .EMADDR 




2840 


012010 


012/37 


030175 


000666 




MOV 


0TMS39.ERADD 


SET ERROR CODE 


2841 


012016 


004737 


016754 




LT37IT: 


JSR 


PC.INIT3 


INIT, SELECT DRIVE 'SLAVE. 


2842 


012022 


052777 


000300 


166512 




BIS 


0300, aic 


SET FORMAT 


284 5 


012030 


005777 


166506 






T5T 


QlTC 


SEE IF ACCLM 


2844 


012054 


100410 








BMI 


LT37A 


IF SO: BR 


2845 


012036 


C12737 


C00001 


000/12 




MOV 


01.EXFL 




2846 


012044 


012737 


012016 


000706 




MOV 


*l.T37IT,SCOLP 


SI T SCOPE ADDRESS 


284 ; 


012052 


004 737 


015222 






JSR 


PC.LTGERO 


GO PRINT ERROR 


2848 


012056 


004737 


016/54 




LT37A: 


JSR 


PC.INTT3 


TNIT 


284<) 


012062 


0527/7 


000300 


166452 




BIS 


0300, &)TC 


SET FORMAT 


2850 


012070 


012777 


000015 


166436 




MOV 


015.QMR 


SET WAM 3 


2851 


012076 


012777 


000071 


166404 




MOV 


#71. aci 


LUAD READ* GO 


2852 


012104 


012/00 


100000 






MOV 


#100000, RO 


SET ACCL DELAr 


2853 


012110 


005777 


166426 




LT37B: 


1ST 


arc 


SEE IF ACCL=0 


2854 


012114 


100012 








BPt. 


LT37X 


IF SO: BR 


2855 


012116 


005300 








DFC 


RO 




2856 


012120 


001373 








BNE 


I T37B 


DEI At 


2857 


012122 


012737 


012056 


000/06 




MOV 


OLT37A.SCOLP 


SET SCOPE ADDRESS 


2858 


012150 


012737 


000002 


000712 




MCV 


02.EXFL 




285M 


012156 


004 737 


015222 






JSR 


PCl.TGF.RO 


GO PRINT ERROR 


2860 


012)42 


004/37 


016600 




LT37X* 


JSR 


PCITtR 




2861 


012146 


00013? 


002530 






JMP 


TSCD2 


RETURN TO SCHEO 



SLQ 0075 



C/H-/UO TM03-TEltv TU/7 CM 1 
CZTF.At.PU 06-APR 84 09:45 



h 
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08o3 
















08o4 

0865 
08t^6 












{LOGIC 


TEST 40; PF TAPl 


015150 


010737 


010166 


000706 


LT40: 


MOV 


4LT40I T ,SC0LP 


.:8b 7 


010160 


010737 


0P6310 


000616 




MOV 


/>MSLT40,EMADDR 


0868 


010166 


004 737 


0.6770 




LT40IT: 


JGR 


PC.INIT4 


^869 


010170 


005000 








CLR 


RO 


^8 ;o 


010174 


005300 






1*8 


DEC 


RO 


0871 


010176 


001376 








BNE 


1$ 


08 /0 


010000 


050777 


000300 


166334 




BIS 


02300, 3TC 


08 73 


010006 


010777 


ooooo • 


166300 




MOV 


&7.3MR 


08 74 


010014 


010777 


00000 7 


166066 




MOV 


#P7,aCl 


08 75 


010000 


010700 


100000 






MOV 


rUOOOOO.RO 


08 76 


010006 


03077 7 


000004 


166066 


0$: 


BIF 


04, SOS 


0877 


010034 


001010 








BNE 


LT40X 


08 78 


010036 


005300 








DEC 


RO 


0879 


010040 


001370 








BNE 


0$ 


.7880 


010040 


010737 


007507 


000666 




MOV 


0TMS3.ERADD 


0881 


012050 


010/37 


000001 


000712 




MOV 


01.EXFL 


0880 


010056 


004 737 


015000 






JSR 


PC.L TGERO 


0885 


010060 


004 73 7 


016600 




LT40X; 


JSR 


PC.ITER 


3884 


01206b 


000137 


000530 




LT40XX; 


JMP 


TSCDO 



SEQ 00 76 



j SET SCOPE ADDRESS 

lINIT, SELECT DRIVE *'7JLAVE 

{DELAY FOR OPI RESET 

{SET WAM 

5 LOAD WRITE TAPE MARK ► GO 

i SET DELAY 

{SEE IF TM--1 

j IF SO: BR 

{DELAY 

;G0 PRINT ERROR 
{RETURN TO SCHEO 



C/H AEO IM05-TF 16 Ri.V CI I I 
CZTtAt-.PU 06 -APR -84 09:45 



Mb 
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.0886 

^88 7 
2888 
2889 
2890 
2891 
2892 
289? 
2894 
2895 
2896 
289/ 
2898 
2899 
2900 
2901 
2902 
2903 
2904 
2905 
2906 
2907 
2908 
2909 
2910 
2911 
2912 
291? 
2914 
2915 
2916 
2917 
2918 
2919 
2920 
2921 
2922 
292? 
2924 
2925 
. '926 
2927 



012272 
012500 
012306 

012312 
012320 
012326 
012334 
C12342 
012344 

012352 
012354 
012356 
012360 
012366 
012374 
012400 
012406 
012410 
012416 
012424 
012430 
012436 
012440 
012446 
012454 
012460 
012462 
012466 
012472 
0124 74 
0124 76 
012502 
012504 
012512 
012514 
012516 
012520 
012524 
012530 



012737 
012737 
004 737 
052777 
012777 
012777 
012777 
005000 
032 777 
001012 
005300 
001372 
012737 
012737 
004 737 
032777 
001010 
012737 
012737 
C04737 
032777 
001011 
012737 
01273/ 
004 737 
000410 
012701 
017702 
020102 
001402 
004 737 
005002 
0327 77 
001002 
005302 
00 J. 3 72 
004 737 
004 73/ 
000137 



012306 
026355 
016754 
001700 
177760 
00000 7 
00002 7 



02752"? 

000001 
015222 
002000 

027772 

000001 
015222 
000100 

027757 
000001 
015222 

002100 
166032 



015210 
000200 



016600 
0156/0 
002550 



SEQ 0077 



000706 LT41: 
000616 

LT41IT 
166222 

166170 
166200 
166146 



000004 166150 1$: 



000666 
000712 

166)16 2$ 

000666 
000712 

166066 3$ 

000666 
000712 



4$ 



I.U1X 

166010 l$i 



I LOG EC TEST 41: NRZ TAPE MARK ( TM, VPE , ITM)* ********* 



2*; 



MOV 4t.T41I T t SC0LP 

MOV 4MSLT41.EMADDR 

JSR PC.INIT3 

BIS 41700, STC 

mov #-20, arc 

MOV 47.3MR 

MOV 427, 3C1 

CLR RO 

BIT 04,305 

BNE 2$ 

DEC RO 

BNE 1$ 

MOV 4TMS3,ERADD 

MOV 41,EXEL 

JSR PC.LTGERO 

BIT 42000, aER 

BNE 3$ 

MOV 4TMS30.ERADD 

MOV 41.EXFL 

JSR PC.LTGERO 

BIT 0100.SER 

BNE 4$ 

MOV 4TMS28.ERADD 

MOV 41.EXFL 

JSR PC.LTGERO 

BR LT41X 

MOV 02 100, R I 

MOV o)ER,R2 

CMP R1.R2 

REU I.T41X 

JSR PC.LTGER3 

CLR R2 

BIT 4200, h)DS 

RNE 2$ 

DEC R2 

BNE 1 $ 

JSR PC.LItR 

JSR PC.DRVCLR 

JMP TSC02 



;SET 



SCOPE ADDRESS 



ilNIT, SELECT DRIVE, SLAVE 
;SET NRZ*NORMAL FORMAT 

{SET res 

{SET WAM 

jLOAD WRITE TAPE MAR1OG0 

jSEE IE TM=1 
I IF SO: BR 

{DELAY 

{SET ERROR CODE 

{GO PRINT ERROR 
{SEE IF ITM*1 
j IF SO: BR 
{SET ERROR CODE 

{GO PRINT ERROR 
{SEE IE VPE*1 
{IE SO: 8R 
{SET ERROR CODE 

jGO PRINT ERROR 



{SET 

GET 
SEE 



EXPT ERROR BUS 
ERROR REGISTER 



IF 
IF 40! 
ELSE PRINT 
SET TIMER 



UNEXPECTED ERROR' 
HR 

ERROR 



SEE IF 

IF SO; 
AWAIT 
DEI At 
GO SEt 
GO 00 
RETURN 



DRi 
BR 
DRi 



SET 



IF I TF RATIONS 
DRIVE CLF AR 
TO SCHED 



C/H-/UO IM03 
CZTEA* ,PU 



2929 
2930 
2951 
2932 
2935 

2934 

2935 

2936 

293/ 

2938 
2939 
2940 

294 1 

2942 

2944 
2945 
2946 
. ^4/ 
29 • 1 
2949 

2950 
2952 
i'954 

2955 
2956 
2957 
2958 
2959 
2960 
2961 
2S62 
,'%^ 
c H »64 
2965 
..'966 



TF lt>- TU/7 C1L I 
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29o7 

2968 
.'969 
29 70 
2.*/l 
29/2 
29/5 
29 /4 
29/', 
• '9/6 
29 / 7 
29 78 
29 ,'9 
2980 
2 *81 
,-98.:' 
29H'. 
2984 



012534 
012542 
012546 
012552 
012554 
012556 
012564 
012572 
012576 
012604 
012612 
012620 
012626 
012634 
012636 
012644 
012646 
012650 
012652 
012660 
012662 
012666 
0126/2 
0126/6 
012/00 
012/04 
012/10 
012714 
012720 
012724 
012732 
012/40 
012/46 
012/54 
012762 
012/64 
012/72 
012/74 
012 //6 
013000 
013004 
01 5006 
013014 
015022 
013026 
013050 
1 30 54 
015040 
013042 



012737 001700 

004 73 7 015024 

012700 001000 

005300 

001376 

012737 026424 

012 73/ 0125/2 

004 7 3 7 017004 

012777 1/7770 

01277* 177760 

01277/ 030204 

0127 7 7 000007 

012 7/ 7 000061 

005000 

052/// 

001002 

005300 

0013/2 

022 777 

00100/ 

017702 

042/02 

0?? 70? 

001410 

004 / 5 / 

012/04 

004 737 
000137 
004737 
012/77 
01277/ 
012777 
012777 
0127 77 
005000 
052/// 
001002 
005300 
0015/2 

005 77/ 165520 
100411 

012 737 030153 
012/3/ O00001 
004/5/ 015222 
000410 

012/01 100200 
01/ /02 165464 
020102 
00X402 



015210 
023216 
017760 

002550 
017004 
17/770 
17/760 
30204 
000021 
000061 



SEC) 0078 



000772 LT42: 



165560 
165556 
16554 6 
165560 
165526 



000666 
000712 



1$: 



LT421T 



000616 
000706 

165706 
165704 

1656 74 
165706 
165654 



000200 165656 t T4?A; 



000200 165644 LT42B: 

165642 
1 / /OOO 
000 77/ 



LT42B1 



I.T42B2 



000200 165530 L.T42C: 



I T42U; 



LT42E; 



I THE FOLLOWING SIX(6) TEST WILL REQUIRE TAPE MOVEMENT. EACH 

;TE5I WILL PERFORM A TAPE WRITE WHILE IN A PARITICUAR MAINTENANCE 

{MODE IN ORDER TO FORCE THE REMAINING ERROR CONDITIONS. 

jLOGIC TEST 42: CYCLIC REDUNDANCY ERRORC CRC )*♦ + + *♦♦ ♦♦♦ 



MOV 


01700.UDES 


iSET UNIT DESCRIPTION - NR/ 


JSR 


PC.SIATIC 


;G0 SEE IF STATIC ONLY 


MOV 


41000, RO 




DEC 


RO 




BNE 


1$ 


S PAUSE 


MOV 


0M5LT42,EMADDR 




MOV 


01 T42IT.SC0LP 


j SET SCOPE ADDRESS 


JSR 


PC. INI I 


ilNIT SELECT DRIVE * SLAVE 


MOV 


#-io. awe 




MOV 


* 20, arc 


jSET EC-20 


MOV 


SWDATA.aeA 


j SET BUS ADDRESS 


MOV 


7 , «MR 


j SET MM CODE 


MOV 


♦ei.aci 


;l OAD WRITE ♦GO 


CLR 


RO 




BIT 


*?00.80S 


j SEE IF DRr-i 


BNE 


L T42B 


jIF SO: BR 


DEC 


RO 




BNE 


LT42A 


:DF.l.At 


CMP 


0200, aER 


;SEE U LRC ERROR ONL j 


BNE 


LT42B1 


;IF NOT: BR 


MOV 


3CC.R2 


{GET CHECK CHAR 


BIC 


0177000, R2 


j MASK CRC 


CMP 


0777. R2 


5 SEE If SETUP CRC IS CORRECT 


REU 


LT42B2 


lU SO: BR 


JSR 


PC.LTGER3 


jFl SI PRINT ERROR 5E H'P 


MOV 


0M5G55.R4 




JSR 


PC.T TOUT 


iPRINT SETUP ERROR MSG 


JMP 


TSC02 


; RETURN TO SCHED 


JSR 


PC.INIT 


s GO INTT 


MOV 


o 10. awe 


j SET WC 


MOV 


20, MFC 


iSET fC 


MOV 


OWDATA.aBA 


;SET BA 


MOV 


02 1 , aMR 


j SET MM 


MOV 


061, aci 


il.OAD WRITE *G0 


CLR 


RO 




BIT 


0200 , aos 


;SEE r. DRi 


BNF 


t T42D 


j IF SO: BR 


DEC 


RO 




BNE 


t U2C 


;AWAIT ORi 


TSf 


a*R 


}SIE V CWC = l 


BMl 


t T42E 


1 IF SO: GR 


MOV 


olM; J 56,ERADD 


[SET ERROR CODE 


MOV 


Ol.LXK 




JSR 


PC, I TGERO 


;G0 PRINT ERROR 


BP 


t T42X 




MUV 


0100200.R1 


j SET t XPT E.KRi'R HITS 


NOV 


at R,/<2 


;U T ERROR REGIS U R 


CMP 


Rl ,R2 


jSEE 1> UNEXPECTED ERRORS 


UtU 


LT42X 


iU NOT; BR 



c:um o 


TM03 Tl 


16 Tl'/; 


CH I 


MAC HI 


C/Tf At . 


PI 1 Ob APR M 


OVi45 




?^tf5 


015044 


004 73 7 


015210 




?^8* 


015050 


004 73/ 


016600 




v^8 7 


015054 


004 73 7 


015670 




?**«*{* 


013060 


00015 7 


002530 




?v)jw 










?QQC 










,N**1 










2**V 


013064 


05? 7 V 7 


000004 


1*5444 


2*W 


Ol5o\ 


001114 






?^94 


150. 1 


012 73 7 


001700 


000 77? 


jqqs 


iVw? 


004 757 


015024 




?^*> 


015106 


012757 


013122 


000 706 


:w: 


015114 


012757 


026460 


000616 


?^98 


013122 


004 73 7 


017004 




?<W» 


015126 


005001 






5000 


013150 


005501 






5001 


013132 


001576 






300? 


013154 


012777 


000025 


16537? 


5005 


01514? 


012777 


177770 


16554? 


5004 


013150 


012777 


177760 


165540 


3005 


013156 


012777 


30202 


165330 


5006 


015164 


012 77 7 


000061 


165516 


500 : 


0151*? 


005000 






300i< 


015174 


032777 


000?00 


1655?0 


500^ 


01320? 


00100? 






5010 


013?04 


005500 






5011 


013?06 


0015 7? 






501? 


01 5? 10 


0327 V 


000200 


165306 


301. < 


0\3?16 


001011 






5014 


015220 


012757 


02 7743 


000*66 


50 IS 


013226 


012737 


00000 1 


000 71? 


3016 


013?34 


004757 


015222 




5'U ; 


013?40 


000425 






301* 


01324? 


017 702 


165266 




vr* 


1 3246 


04? 70? 


00017 7 




30?0 


013252 


012701 


15 7600 




30? 1 


013?56 


0?0102 






3022 


013?60 


O01405 






30? 3 


013?62 


01?737 


0_ J 3173 


000666 


30?4 


01 3? 70 


004 7 5 7 


016556 




3o?s 


015?74 


017 70? 


165224 




3"26 


015500 


012701 


000?00 




50? 7 


013304 


02010? 






502* 


015506 


001402 






30?S< 


013310 


004 75 7 


015210 




30 30 


013514 


004737 


016600 




"3051 


015520 


004 7 3 7 


0156 70 




30 3? 


0133?4 


00015 7 


002550 





<0( 104(0 06 APR H4 (W|4H PAW. 6fl 1 



'>fr.GI 00 /S 



I T4?Hj 



I T43: 



I T45IT 
111 



I.T43C 



LT430: 



U4*t j 



i 14 5K; 



T43X* 
T43x> . 



JSR 
JSR 

JSR 
JMP 



PC, I TliEH3 
PC, HER 
PC.DRVCL.R 

TSCD? 



S ft St PRINT ERROR 
|D0 ITERATIONS 

I RE TURN TO SCHtD 



ilOGIC TEST 45} LQNGITUAL1NAL REDUNDANCE! RC >♦♦♦♦ ♦♦•♦♦ 



BIT 04.&0T 

BNE I.T45XX 

MOV OWOO.UOES 

JSR PC, STATIC 

MOV 01 T43IT.5COI.P 

MOV 0M51 T4 3.EMADDR 

JSR PC.INIT 

CL.R Rl 

DEC Rl 

BNE 1 i 

MOV *?5,tfMR 

MOV *-10, SWC 

MOV * 20,6* C 

MOV *W0ATA,B6A 

MOV *6i, BC1 

CLR PO 

BIT «200,S0S 

BNE LT4 3D 

DEC RO 

BNt LT43C 

BIT 0200. *R 

BNt L.T43E 

MOV 0TMS?6,tRADD 

MOV •l.tXR 

JSR PC, I TGtRO 

BR L T43X 

MOV 8MR.R? 

BIC 0177 t R? 

MOv «is;^oo,ri 

CMP Rl.R? 

BEQ LT4V 

MOV OMsii53 t tRADD 

JSR PC. I. TGtRl 

MOV yfR.R? 

MOV 0200, Rl 

CMP Rl.R? 

BE 1 T43X 

JSR PC. I U*\ R3 

JSR Pi', ITER 

J,R PC.ORVCI n 

JMP T'.CD? 



I »»B BRANCH IF NOT A Ttl6 

»..B 

|5E T UNIT DESCRIPTION - NR/ 

li.O StE u STAT tc ONI. i 

I SET SCOPT ADDRESS 

jINIT, SFl.FCT DRIVE ♦SLAVE 

iDtl At 

l SET MM 
l SET WC 
I SET >C 
I SET BA 

I LOAD WRITE >G0 

.SEE U DRi 

I IK SO} BR 

I AWAIT URl 
jSU IF IRC-l 
I V SO: BR 
I St T t RRCR CODE 

I GO PRINT 



I MASK l RC 

ist ! i *pr i pc 

I Sit U EaPT - RCVf) 

I V SO: BrJ 

a SET tRROR COOf 

jPRINT ERROR 

I tit. T ERROR REGISTER 

I St T EXPT ERROR BIT, 

I Sit It LINE XPECTtl) ERRORS 

i V NOT: BR 

itl St PRINT ERROR 



iRt TURN TO SCHtD 



lVU At IN05 

c*me ae .►mi 



n ib ii'/.' ci t i 
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SEQ OOHO 



5054 
5055 
505b 
505 ' 
5058 
505*» 
504 
504 1 
5 04 J 
5045 
5044 
504? 
?04b 

504 : 
5043 
5049 
5050 
5051 
5052 

505 5 
5054 
5055 
5056 
505 : 
5050 
5059 
5060 
5061 
506c 
5065 
5064 
3065 
5066 

506 : 

50b N 

506^ 
50 70 
5071 
50 72 
50 75 
a '4 
50 75 
50 -6 
50 7 7 



015550 
01555b 
015542 
015550 
015556 
01556*? 
0155/0 
015576 
015404 
0154 12 
015414 
015420 
015422 
015424 
015426 
015454 
0154 56 
015444 
015446 
015450 
015452 
015456 
015460 
015466 
015474 
015500 
015502 
015510 
015512 
015516 
015522 
015526 
015554 
015540 
015542 
015546 
015552 
015554 
I 5556 
015562 
015566 
015572 



012757 
004 757 
01275 7 
012757 

004 757 
012777 
012777 
01277/ 
012/77 
005000 

005 777 
001402 
005500 
001575 
012777 
005000 
052/77 
001002 
005500 
001572 
005 / 7 7 
100410 
01275/ 
012 75/ 
004 75 7 
000c40 
12277/ 
001414 
117 702 
042702 
112/01 
012757 
004 757 
000410 
017/02 
012701 
020102 
001402 
004 7 5 7 
004 f 5 / 
004/57 
000157 



002500 
015024 
026514 
015556 
017004 
17 7600 
17 7400 
050204 
00006 1 

165076 



000021 
000200 

165040 

050144 
OOCOOl 
015222 



0007 72 I T44 : 



000b lb 
000 706 

165122 

165120 
165110 
1650 76 



165100 
165056 



000666 
000712 



000002 165020 

165012 

17 7000 

0O0002 

022602 0006b6 

016556 

164 756 
100000 



015210 
016600 
0156/C 
002550 



LT44IT: 



LT44Ai 

I.T44A1 
LT44B: 

LT44C: 



LT44D: 
LT44fcj 



L. T44F-} 

I T44X: 

l.T44<X S 



il.GCUC TEST 44: PE CORRECTABLE DATA ( CORR }♦♦•**••♦♦♦ ♦ 



MOV 02500, UOE 5 

JSR PC.5TAMC 

MOV 0M5LT44,EMAD0R 

MOV 01T44IT.5C0LP 

JSP PC, INI T 

MOV 0-200, OUC 

MOV 0-400, BE* C 

MOV 0W0ATA,o)8A 

MOV 061,60 

Cl.R RO 

T5T MfC 

BEQ I.T44A1 

DEC RO 

BNE LT44A 

MOV 021.8MR 

CI R RO 

BIT 0200,6)05 

BNE LT44C 

DEC RO 

BNt LT44B 

TST 6*R 

BMI I T44D 

MOV OTM555.ERADD 

MOV •UEXfL. 

JSR PC.LTGERQ 

NOP 

CMPB 02.QCC 

BEU LT44f 

MOVB BCC.R2 

BIC 01/7OOO.R2 

510VB 02, Ri 

MOV 0MSG42.ERADD 

JSR PC.LTGER1 

BR I. T44X 

MOV c*R,R2 

MOV 01 00000, HI 

CMP R1,R2 

BE U L T44X 

JSR PC ,i Tlil W5 

JSR PC .ITER 

JSP K.DRVCl.R 

JMP fSCD2 



SET UNIT DtSRIPUON * PE. 

GO SEE ir STATIC ONI i 

SET HEADER 

SET SCOP 

GO INITIALIZE 

SET WC-200 

SET rc-400 

SET BA-START Of W.^ITE BUFTEP 

I OAD WRITF AND GO 

SEE IF' f C-0 
IE SOs BR 

AWAIT f C-0 
SET MAINT MODE 

SEE IE DRr 
U SO i BR 

AWAIT DRi 

SEE IE CORR-1 

V SO: BR 

El 5E St T E RROR COD* 
Sh T EXPT M AG 
GO PRINT ERROR 

SEE IE DEAD TRACK BIT 1 
If SO: BR 

EL SE SAvt RECVD 
MASK OUT CRC 
SAVE EXPT 
SE T f RROR CODt 
GO PRINT ERROR 

GET ERROR REGIS It R 
SE T EXPT ERROR BITS 

see ie txpr-pcvo 

V SO: BR 

t I SE PRINT ERROR 

GO SEE U HERAT IONS 
GO DO DRIVE CLEAR 
RE TURN TO SCHED 



C/TLrtl t P 

30 >* 
3080 
3081 
308.? 
3063 
3064 
3085 
5066 

3oh; 

3088 
3089 

3090 
3091 
30<V 
3093 
3094 
3095 
3096 
309" 
3098 
3099 
3100 
3101 
310? 
3103 
3104 
3105 
3106 
3107 
3108 
3109 
3110 
3111 
311? 
3113 
3114 

3iis 

3116 
311? 
3116 
3119 
3120 
3121 
312? 



T H03 
11 
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013576 
013604 
013610 
013616 
0136?4 
013630 
013636 
013644 
013652 
013660 
01366? 
013666 
013670 
01367? 
013674 
01370? 
013704 
01371? 
013714 
013716 
013720 
013726 
013730 
013736 
013744 
013750 
013754 
013760 
013764 
013766 
015770 
013776 
01400c 
014006 
014012 
014016 
014020 
014022 
014026 
014032 
014036 



012737 
004737 
012737 
012737 
00473'/ 
012777 
012777 
012777 
01277? 
005000 
005777 
001402 
005300 
001373 
012777 
005000 
03277? 
001002 
005300 
001372 
032777 
001010 
012737 
012737 
004737 
017702 
042702 
C12701 
020102 
001405 
012737 
00473? 
017702 
042 702 
012701 
020102 
001402 
004 737 
004 7 3 7 
004 73 7 
000137 



002300 
015024 
026574 
013624 
017004 
17 7600 
17 7400 
030204 
000061 

164630 



000023 
000200 



027 721 
000001 
015222 
164554 
17 7000 
000046 



023205 
016356 
164516 
120600 
000100 



015210 
016600 
015670 
002530 



5EQ 0081 



000 7 7? I.T45} 



000616 
000 706 

164654 
16465? 
16464? 
164630 



16463? 
164610 



000666 
000712 



000666 



LT45IT; 



LT45E: 

I T45E1 

LT45A: 



000100 164576 LT45B: 



LT450J 



L.T45F: 



tlOGrC TEST 45: PE INCORRECTABLE DATA( INC )*♦♦♦*♦*♦♦♦ * 



L T45X: 
LT45XX} 



MOV 02300, ODE 5 

JSR PC, STATIC 

MOV 0MSLT45.EMADDR 

MOV 0LT45IT,SC0l.P 

JSR PC, INI T 

MOV 0-200.8WC 

mov «-400, arc 

MOV OWDATA,o»A 

MOV 06 1, SCI 

CL.R RO 

TST tff'C 

BEQ LT45E1 

DEC RO 

BNE LT45E 

MOV 023.SMR 

CLR RO 

BIT 0200, SOS 

BNE LT45B 

DEC RO 

BNE LT45A 

BIT 0100, QER 

BNE LT45D 

MOV OTMS23.ERAD0 

MOV oi.Exn 

J5R PC.LTGERO 

MOV SCC.R2 

BIC 0177000, R2 

MOV 046, Rl 

CMP R1.R2 

BtQ LT45F 

MOV 0M5G54.FR ADO 

JSR PC.LTGER1 

MOV 3ER.R2 

BIC 0120600, R2 

MOV 0100, Rl 

CMP Rl.R? 

BEQ I T45X 

JSR PC.LTlit.H3 

JSH PC, ITER 

JSR PC.DRVCIR 

JMP TSCO? 



SET UNIT DESCRIPTION - PL 
GO SEF IP" STATIC ONL T 



INIT SELECT DRIVE SLAVE 

SET WC-200 

SET EC -400 

SET BA-START 0^' WRITE BUFFER 

LOAD WRITE *G0 

AWAIT FC-0 



AWAIT FC-0 
SET MAINT CODE 

SEF IF DRr IS SET 
IF SO; BR 

AWAIT DRi 
SEE IF INC-1 

IF SOs BR 

SET ERROR CODE 

GO PRINT ERROR 
GET CHECK CHAR 
MASK CHECK CHAR 
SET F.XPT CK 
SEE IE EXPT » RCVD 
IF SO j BR 

El St GO PRINT EHROH 

MASK OP I ,NSG, CORR, AND PE>' 

SET EXPT tRROR BITS 

SEE IF UNEXPECTED ERRORS 

V NOT . BR 

El St PRINT ERROR 



{RETURN TO SCHEO 
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SEQ 0082 



3124 


















3125 
3KV 
3127 












j LOGIC 


TEST 46: PE FORMAT ERRORC PEF , NSG )« ♦♦♦♦♦*♦*♦ 


014042 


012737 


002300 


0007 72 


LT46: 


MOV 


#2300, ODES 


SET UNIT DESCRIPTION * PE 


3128 


014050 


004 73 7 


015024 






JSR 


PC, STATIC 


GO SEE IF STATIC ONLr 


3129 


014054 


012737 


026656 


000616 




MOV 


0MSLT46.EMADDR 


SET HEADER 


3130 


014062 


012737 


014070 


000706 




MOV 


0LT46IT,SC0LP 


SET SCOPE /«Ofj«ESS 


3131 


014070 


004 737 


017004 




LT46IT: 


JSR 


PC.INIT 


INITIALISE 


3132 


014074 


012777 


177770 


164410 




MOV 


0-10, awe 


SET WC-10 


3133 


014102 


012777 


177760 


164406 




MOV 


a-20, sfc 


SET FC-20 


3154 


014110 


012777 


030204 


164376 




MOV 


OWDATA.SBA 


SET BA-START OF WRITF BUFFER 


3135 


014116 


012777 


000061 


164364 




MOV 


061, SCI 


LOAD WRITEfGO 


3136 


014124 


005777 


164 366 




LT46A; 


TST 


arc 




3137 


014130 


001375 








BNE 


LT46A 


AWAIT FC-0 


3138 


014132 


032777 


000100 


164374 


1$: 


BIT 


0100, SMR 


UAIT FOR TAPE TO START WRITtING POSTAMBLE 


3139 


014140 


001774 








BEG 


i% 


DELAY 


3140 


014142 


032777 


000100 


164364 


2$: 


BIT 


0100, SMR 




3141 


014150 


001374 








BNE 


2* 




3142 


014152 


012777 


000027 


164 354 




MOV 


027, SMR 


SET MM CODE TO KILL PEF 


3143 


014160 


005000 








CLR 


RO 


INIT TIMTNG LOOP 


3144 


014162 


032777 


000200 


164332 


IT46B: 


BIT 


0200. SOS 


SEE IF DRY SET 


3145 


014170 


001002 








BNE 


LT46C 


IF SO: BR 


3146 


014172 


005300 








DEC 


RO 




314 7 


014174 


001372 








BNE 


LT46B 


AWAIT DRY 


3148 


014176 


032777 


000200 


164320 


LT46C: 


BIT 


0200, SER 


SEE IF PEE SET 


3149 


014204 


001011 








BNE 


LT46D 


IF SO: BR 


3150 


014206 


012737 


027735 


000666 




MOV 


0TMS25,ERADD 


SET ERROR TAG 


3151 


014214 


012737 


000001 


000712 




MOV 


Ol.EXFL 


SET EXPT FLAG 


3152 


014222 


004737 


015222 






JSR 


PC.LTGERO 


GO PRINT ERROR 


3153 


014226 


000420 








BR 


L T46X 




3154 


014230 


017 702 


164270 




LT460: 


MOV 


SER.R2 


GET ERROR REGISTER 


3155 


014234 


042702 


120100 






BIC 


0120100.R2 


♦ *B CLEAR CRC.OPI 6 INC BITS (MAi OR MAl 


3156 


014240 


012701 


000600 






MOV 


0600, Rl 


♦♦B SET EXPT ERROR BITS (NSG ♦ PEF) 


3157 


014244 


032777 


000004 


164264 




BIT 


04, SOT 


>*B BRANCH IF TE16 


3158 


014252 


001402 








BEQ 


1$ 


♦ ♦B 


3159 


014254 


042701 


000400 






BIC 


0400,R1 


♦ ♦B TU77 SHOULD NOT SET NSG BIT 


3160 


014260 


020102 






1*: 


CMP 


R1.R2 


SEE U UNEXPECTED ERRORS 


3161 


014262 


001402 








BEQ 


LT46X 


IF NOT: BR 


316? 


014264 


004737 


015210 






JSR 


PC, I TGFR3 


ELSE PRINT ERROR 


3163 


0142/0 


004737 


016600 




I.T46X: 


JSR 


PC.1TFR 




'5164 


0142^4 


004737 


01*3670 






JSR 


PCORVCLR 




3165 


014300 


000137 


002530 




LT46XX: 


JMP 


TSC02 


RETURN TQ SCHED 



NOT SET) 
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SEQ 0083 



5it. : 

3168 
3169 












{LOGIC 


TEST 47 j FRAME 


COUNT 0VERFLOWCM8905-YB 


014304 


012737 


026712 


000616 


LT47; 


MOV 


4MSLT4 7.EMADDR 


iSt . TEST HEADER 


3170 


014312 


012737 


014320 


000706 




MOV 


4LT4 7IT.SC0LP 


{SET SCOPE ADDRESS 


3171 


014320 


004737 


016754 




LT47IT; 


JSR 


PC.INIT3 


{GO INIT 




014324 


012777 


177770 


164160 




MOV 


4-10, awe 


{SET WC ■ 10 


3173 


014332 


012777 


177760 


164156 




MOV 


4-20.QFC 


{SET FC - 20 


3174 


014340 


052777 


001700 


164174 




BIS 


41700. QTC 


{SET TO NRZ. NORMAL, 


3175 


014346 


012777 


030204 


164140 




MOV 


4WDATA,S)8A 


{SET BUS ADDRESS 


3176 


014 354 


012777 


000013 


164152 




MOV 


413, 3MR 


{SET WRAP 2 


3177 


,>14362 


012777 


000061 


164120 




MOV 


461. SCI 


{LOAD WRITE >G0 


3178 


011370 


012700 


040000 






MOV 


440000.R0 




3179 


014374 


005777 


164142 




LT47A: 


TST 


stc 


{SEE IF ALPHA 


3180 


014400 


100002 








BPL 


LT4 7B 


j IF SO j BR 


3181 


014402 


005300 








DEC 


RO 




3182 


014404 


001373 








BNE 


LT47A 


jAWAIT ALPHA 


3183 


014406 


012700 


000020 




LT47B: 


MOV 


420.R0 


j SET CLK CNT 


3184 


014412 


052777 


000040 


164114 


LT47C; 


BIS 


440.SMR 




3185 


014420 


042777 


000040 


164106 




BIC 


440.SJMR 


{CLOCK MR 


3186 


014426 


005300 








DEC 


RO 




3187 


014430 


001370 








BNE 


LT47C 


lir NOT DONE ALL: BR 


3188 


014432 


017702 


164060 






MOV 


arc,R2 




3189 


014436 


005001 








CLR 


Rl 


;SET TEST WORO 


3190 


014440 


020102 








CMP 


R1.R2 


{SEE IF EXPT * RCVD 


3191 


014442 


001410 








BEQ 


LT47X 


{IF SO; BR 


3192 


014444 


012737 


022055 


000666 




MOV 


4MSG19.ERAD0 


;SET ERROR CODE 


3193 


014452 


012737 


000001 


000712 




MOV 


41.EXFL 


{SET EXPT FLAG 


3194 


014460 


004737 


016336 






JSR 


PC.LTGER1 


{GO PRINT ERROR 


3195 


014464 


004 73 7 


016600 




LT47X; 


JSR 


PC. ITER 


jGO SEE IF ITERATIONS 


3196 


014470 


000137 


002530 






JMP 


TSC02 


{RETURN TO SCHEDULAR 


3197 



















ODD 



CZThAEO TM03 
CZTEAK.Pll 



TUb- iu;/ CTl I 
06 -APR -84 09:45 



G / 
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31*9 

3200 
3201 
3202 
3203 
3204 
3205 
320t> 
3207 
3208 
3209 
3210 
3211 
3212 
3213 
3214 
3215 
3216 
3217 
3218 
3219 
3220 
3221 
3222 
3223 
3224 
3225 
3226 
322 * 
3228 
3229 



014474 
014502 
014510 
014514 
014522 
014530 
014536 
014544 
014552 
014560 
014566 
014570 
014572 
014574 
014600 
014604 
014606 
014610 
014616 
014622 
014624 
014626 
014630 
014634 
014640 
014644 



012737 
012737 
004737 
042777 
052777 
012777 
012777 
012777 
012777 
012777 
000240 
000240 
000240 
012701 
017702 
030102 
001006 
012737 
004 73 7 
000404 
020102 
001402 
004737 
004 737 
004737 
000137 



026762 
014510 
016754 
003400 
002300 
177770 
177760 
030204 
000013 
000061 



004000 
163720 



000001 
015222 



015210 
016600 
015670 
002530 



SEQ 0084 



000616 
000706 

164020 
164012 
163754 
163752 
163742 
163754 
163722 



000712 



{LOGIC TEST 50; NF.F WHEN WRITING PE ON NR7 SELECTED SLAVE 



LT50: 



MOV 
MOV 

LV50IT: JSR 
BIC 
BIS 
MOV 
MOV 
MOV 
MOV 
MOV 
NOP 
NOP 
NOP 

2$: MOV 

3$ j MOV 
BIT 
BNE 
MOV 
JSR 
BR 

1$: CMP 
BEQ 
JSR 

LT50X* JSR 
JSR 
JMP 



#MSLT50,EMADDR 
#LT50IT,SC0LP 
PC.INIT3 
#3400, STC 
02300, STC 

#-lo,awc 
#-20, arc 

OWDATA.BBA 

ftl3,5)MR 

#6l,aCl 



#4000, Rl 

3ER.R2 

R1,R2 

II 

*1.EXKL 

PC.LTGERO 

LT50X 

R1.R2 

LT50X 

PC.LTGER3 

PC, ITER 

PC.DRVCLR 

T5CD2 



{SET ERROR POINTER FOR STANDARD 

I SET SLAVE - NR7 
{CLEAR DENSITY BITS 
{SET DENSITY » PE 

WORD COUNT 

FRAME COUNT 

BUS ADDRESS 

WRAP 2 
WRITE COMMAND 



{SET 
{SET 
;SET 

{SET 
;LOAD 



{SET EXPECTED RESULT 
{GET ERROR REGISTER 
{BRANCH IF NEF BIT SET 

{SET EXPECTED FLAG 
{PRINT ERROR 

{BRANCH IF NO UNEXPECTED ERROR 
{BITS WERE SET 
{PRINT ERROR MSG 
{♦ITERATE TEST 
{RESET DRIVE 



1-1/ 



C'n.At o 


1M03 n. 


16 K'.V 


Cll. t 


MACU1 


czrt.At , 
33 5 1 

3332 
3333 


PI 1 06 -APR -84 


09 j 45 












3334 


014650 


012737 


02 7043 


000616 


3235 


014656 


012737 


014664 


00070b 


333b 


014664 


004737 


016770 




3337 


014670 


042777 


002300 


163644 


3238 


014676 


052777 


001300 


163636 


3239 


014704 


012777 


177770 


163600 


3340 


014712 


012777 


177760 


163576 


3341 


014730 


013777 


050204 


163566 


3343 


014726 


013777 


000013 


163600 


324? 


014 734 


012777 


000061 


163546 


3244 


014 743 


000240 






324 5 


014744 


000240 






3246 


014746 


000240 






324"* 


014750 


013701 


004000 




3248 


014754 


017702 


163544 




3349 


014760 


030103 






3250 


014 762 


001006 






3351 


014 764 


012737 


000001 


000712 


3253 


014 772 


004 737 


015222 




3253 


014776 


000404 






3254 


015000 


030102 






3255 


015002 


001403 






3256 


015004 


004737 


015210 




3 257 


015010 


004 737 


016600 




^258 


015014 


004737 


015670 




3259 


015020 


000137 


002530 
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SEQ 0085 



lLOCUC TEST 51: NEF WHEN WRITING NR/ ON PE SELECTED SLAVE 



LT51: 

LT51IT 



1$: 

LT51X; 



MOV 
MOV 
JSR 
BIC 

Brs 

MOV 

MOV 

MOV 

MOV 

MOV 

NOP 

NOP 

NOP 

MOV 

MOV 

BIT 

BNE 

MOV 

JSR 

BR 

CMP 

BEQ 

JSR 

JSR 

JSR 

JhP 



0MSLT5l,EMADDR 
OLT51IT.SC0LP 
PC.INIT4 
02300, STC 
01300. 3TC 
0-10, awe 
0-20, SFC 
0WDATA,5)BA 
Ol3,tfMR 
061, aci 



04000, Rl 

SER.R2 

R1,R2 

1$ 

01,fcXFL 

PC.LTGERO 

LT51X 

R1.R3 

LT51X 

PCLTGER3 

PC, ITER 

PCDRVCLR 

TSCD2 



}>SET ERROR POINTER FOR STANDARD COW 

i SET SCOPE LOOP ADDRS. 

{SET SLAVE - PE 

tCLEAR DENSITY BITS 

{SET DENSITY - NRZ 

j SET WORD COUNT 

; SET FRAME COUNT 

j SET BUS ADDRESS 

•SET WRAP 2 

JSET WRITE COMMAND AND GO 



j SET EXPECTED RESULT 
jGET ERROR REGISTER 
; BRANCH IF NEF SET 

j SET EXPECTED FLAG 
iPRINT ERROR MSG 

;BRANCH IF NO UNEXPECTED 
;ERROR BITS WERE SET 

.♦♦ITERATE TEST 

j CLEAR DRIVE 

{RETURN TO SCHEDULER 



c:u mo 


1M03 U lb lU/.' 


cu r 


CZTFAF. 


Pll 06 APR 84 


09; 45 


32*1 








32b2 








32b 5 


015024 


005737 


000 734 


3264 


015030 


001006 




32b 5 


015032 


005737 


00100b 


326b 


01503b 


001405 




>2b * 


015040 


005726 




32o8 


015042 


000137 


002530 


3 2^ 


01504b 


00505 7 


001002 


3^ 


015052 


00020 ? 




3*? 71 
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STATIC 



W 



SEQ 0086 



STATIC TESTS ONLY SUBROUTINE********* 



TST 


stelc; 


BNF 


1* 


tst 


STATC 


DEQ 


1$ 


TST 


(SP)» 


vJMP 


TSCD2 


ClR 


RDRVF 


rts 


PC 



5 SEE IF 

I IF SO: 

j SEE IF 

j IE NOT 
c 



SINGLE TEST ONLY 
BR 

STATIC ONLr 
: BR 
STACK 
t RE TURN TO SCHEDULAR 



j RESET 



{RETURN TO TEST 



«. .' I 



C/TLAEO 'M03-TE16 K'// CH I 
CZTEAE.P11 06 -APR 64 09:45 



32*3 
3274 

32 



32 



,*6 



3 c 

32 78 

327<» 

3280 
3281 
328;-? 
3283 

3284 
3285 
3286 

328 ' 
3286 
3289 

3290 
3291 

3292 
3293 
3294 

3295 
3296 

329 7 
3296 
3299 
3300 
3301 
3302 
3303 



015054 
015060 
015064 
015070 
015074 
015102 
015104 
015110 
015116 
015120 
015122 
015124 
015126 
015130 
015136 
015140 
015144 
015146 
015152 
015156 
015162 
015166 
015174 
015176 
015200 
015202 
015206 



017700 
042700 
052 700 
010077 
042777 
005000 
012701 
0327 7 7 
001430 
005300 
001372 
005301 
001370 
032777 
001020 
005737 
001004 
013704 
004 737 
012704 
004737 
032777 
001401 
000000 
000240 
00503 7 
000207 



163454 
000036 
000024 
163440 
000037 

000002 
000001 



020000 

000614 

000616 
017 760 
03061/ 
017760 
100000 



000672 
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;END OF RECORD FORCE SUBROUTINE***** 



SEQ 008 7 



163432 



163372 



163432 



163374 



EORPA; 


MOV 


3MR.R0 


j GET MAINT REG 




BIC 


036.R0 


; CLEAR CURRENT OP CODE 




ais 


024.R0 


jSET EOR CLEAR OP CODE 




MOV 


RO.ulMR 


i DO EOR 




BIC 


037. 8MR 


•.CLEAR EOR AND MM 




CLR 


RO 






MOV 


02. Rl 




EORPl; 


BIT 


oi.aci 


J-..EE IF G'i GONE 




BEQ 


E0RP2 


j IF SO: BR 




DEC 


PO 






BNE 


E0RP1 


{AWAIT GO RESET 




DEC 


Rl 






BNE 


E0RP1 






BIT 


020000. 3SWR 


{SEE IF ERROR PRINT INHIBIT 




BNE 


E0RP2 


{IF SO: BR 




TST 


HDRFL 


;SEE IF DONE HEADER 




BNE 


E0RP1A 


5 U SO: BR 




MCV 


EMADDR.R4 






JSR 


PC. T TOUT 


{PRINT HEADER 


E0RP1A: 


MOV 


0WMSG31.R4 






JSR 


PC. T TOUT 


{PRINT EOR GO BIT f RROR 




BIT 


100000. 3SWR 


{SEE U HAl T ON ERROR 




BEQ 


E0RP2 


{IF NO! : BR 




HALT 






E0RP2: 


NOP 






EORPX: 


CLR 


H.MP2 


;CL EAR I LAG 




RTS 


PC 


{RETURN 



1/ 



C/Urtt-0 


1N03-U lb K9V 


CU. 1 


MACU1 


30( 1046) 


06 APR 


•84 09:4« P 


CZTFAF. 


HI 06 APR 84 


09 j 45 










3305 












{LOGIC 


TEST ADDRESS* 


3306 
















330 : 


015210 


00503 7 


000 712 




I TGFR3: 


CLR 


EXFL 


3308 


015214 


012737 


023144 


000666 




MOV 


0MSGS1.ERADD 


3309 


015222 


012737 


000001 


000742 


LTGf.R0; 


MOV 


Ol.ADDFL 


3310 


015230 


000240 






LTGERj 


NOP 




3311 


015232 


005037 


000662 






Cl.R 


PF'LG 


33 12 


015236 


032777 


020000 


163324 




BIT 


020000, 5)SWR 


3313 


015244 


001112 








bne 


l.TGX 


3314 


015246 


005737 


000614 




LTGA: 


TST 


HDRFL 


331? 


015252 


001004 








BNE 


LTGA1 


3316 


015254 


013704 


000616 






MOV 


EMADDR.R4 


331" 


015260 


004 737 


017 760 






JSR 


PC.T TOUT 


3318 


015264 


012737 


000001 


000614 


LTGA1: 


MOV 


ttl .HDRFL 


3319 


015272 


013704 


000666 






MOV 


ERADD.R4 


3320 


015276 


004737 


017 760 






JSR 


PC.TTOUT 


3321 


015302 


005757 


000742 






TST 


ADDFl. 


3322 


015306 


001003 








BNE 


L.TGA2 


3323 


015310 


010103 








MOV 


RI.R3 


33^4 


015312 


004 73 7 


020172 






JSR 


PC.OCTP 


3325 


015316 


005737 


000712 




LTGA2: 


TST 


EXFL 


3326 


015322 


001412 








BEQ 


L^GC 


3327 


015324 


012704 


021455 






MOV 


0MSG6.R4 


3328 


015330 


022737 


000001 


000712 




CMP 


01. EXFL 


3329 


015336 


001402 








BEQ 


LTGB 


3330 


015340 


012704 


021454 






MOV 


0MSG7.R4 


3331 


015344 


0047*7 


017 760 




I.TGB: 


JSR 


PC.TTOUT 


3332 


015350 


005237 


000662 




LTGC: 


INC 


Pf'l G 


3333 


015354 


005737 


000742 






TST 


ADOFL 


3334 


015360 


001430 








H^Q 


LTGD 


3335 


015362 


005737 


000740 






TST 


T24FL 


3336 


015366 


001423 








BEQ 


l.TGCO 


333/ 


015370 


012704 


030604 






MOV 


0UMSG2 7 , R4 


3338 


015374 


004737 


017760 






JSR 


PC.TTOUT 


3339 


015400 


012704 


021755 






MOV 


0MSG12.R4 


3340 


015404 


004737 


017 760 






JSR 


PC.TTOUT 


334 1 


015410 


012 703 


177777 






MOV 


Q 1.R3 


3342 


015414 


004737 


020162 






JSR 


PC.0C1PE 


3 54 3 


015420 


012704 


021764 






MOV 


0MSG 1 3 , R4 


334 4 


01 5" 24 


004 737 


017760 






JSR 


PC.l TOUT 


3345 


0154 30 


010103 








MGV 


R1.R3 


3346 


015432 


004 73 7 


020162 






JSR 


PC.OCTPE 


334 7 


015436 


004737 


015534 




I TGCOj 


JSR 


PC.REGP 


3348 


015442 


032777 


004000 


163120 


LTGOi 


BIT 


*4 ooo, as WR 


3149 


015450 


001010 








BNE 


l.TGX 


3350 


015452 


012704 


022026 






MGV 


om;gi6,r4 


3351 


015456 


004 737 


017 760 






JSR 


PC.TTOUT 


3352 


015462 


013 703 


000676 






MOV 


HCNT.R3 


3353 


015466 


004 73 7 


0201/2 






JSR 


PC.OCTP 


3354 


0154 72 


005 7 7 7 


163072 




l.TGX: 


TST 


asun 


3355 


0154/6 


100001 








Bt-'l 


I TtiXA 


3 3 56 


015500 


000000 








HAl I 




335 ■■ 


015502 


00571/ 


000662 




LTGXA: 


1ST 


PF LCi 


3 ',59 


1 5506 


001004 








BNF 


I TGXX 


3 .*.' •'* 


015510 


032/7 7 


020000 


163052 




Mil 


.720000 , 6]SWR 


3560 


015516 


001653 








beu 


I. TUA 



SEG 0066 



ERROR SUBROUTINE********** 



} SET NO ADDRESS FLAG 

{CLEAR PRINT F LAG 
} SEE IF SHOULD PRINT 
{IF NOT j BR 

tSFE TF PRINTED HEADER 
ilf SO: BR 

{PRINT TEST HEADER 
{SET HEADFR FLAG 

{PRINT CONDITION ERROR 



; PR INT ADDRFSS 

j IF NO STATUS: BR 

;EXPT NOT RCVD 

.RCVD NO! EXPT 
{PRINT STATUS 

j SEE IF ADD TST 
{IF SO: BR 
;SEE IF TEST 24 
;IF NOT: BR 

{PRINT DATA TAG 

{PRINT FXPT TAG 

{PRINT FXPT 

{PRINT RCVD TAG 
(GET RCVD 

{PRINT RCVD 
{PRINT REGISTERS 



jPRTNT ITERATION 



I U" NUI STOP UN ERROR: W 



i IF PR1NTED{ BR 



L 



C/M Al 


1N03 n 


lb U'// 


CH 1 MAO 11 30(1046) Ob APR-84 09*4 


CZTEAE. 


Pll 06 APR 84 


09:45 






33bl 


015520 


00503 7 


000742 


LTGXX: Ct R 


ALW I 


3 3b J 


015524 


00503 7 


000/12 


CLR 


L-XM. 


3 3b 3 


015530 


000137 


016550 


JMP 


SCOPE 


3 564 












33o5 








{SUBROUTINE TO Pi 


33bb 












336 7 


015534 


000240 




REGP: NOP 




33b8 


015536 


012704 


02276 7 


MOV 


0MSG46.R 


33b9 


01554? 


004 73 7 


017760 


JSR 


PC.TTOUT 


3370 


015546 


017703 


162 7 36 


MOV 


3C1.H3 


3371 


01555? 


004 737 


02016? 


JSR 


PC.OCTPE 


33 7 J 


015556 


017703 


162730 


MOV 


63WC.R3 


3373 


015562 


004737 


020162 


JSR 


PC.OCTPF 


3374 


015566 


017703 


162722 


MOV 


o)6A,R3 


33 75 


015572 


004 737 


020162 


JSR 


PC.OCTPE 


3376 


015576 


017703 


162714 


MOV 


5)TC,R3 


337 7 


015602 


004 73 7 


020162 


JSR 


PC.OCTPF 


33 76 


015606 


017703 


162706 


ItOV 


acs,R3 


3379 


015612 


004737 


020162 


JSR 


PC.OCTPE 


3380 


015616 


017703 


162700 


MOV 


aos,R3 


3361 


015622 


004 73 7 


020162 


JSR 


PC.OCTPE 


3382 


015626 


017703 


162672 


MOV 


SF.R.R3 


3383 


015632 


004737 


020162 


JSR 


PC.OCTPE 


3384 


015636 


017703 


162664 


MOV 


SAS.R3 


3 385 


015642 


004 737 


02016? 


JSR 


pc.octpe 


3386 


015646 


017 703 


16266? 


MOV 


oJMR U3 


338/ 


015652 


004 737 


02016? 


JSR 


PC ,0C TPf : 


3388 


015b56 


017703 


162660 


MOV 


arc.R3 


3389 


015662 


004 73 7 


020162 


JSR 


PC.OCTPE 


3390 


015666 


00020 7 




RTS 


PC 


3391 












339c 1 













PAGE. 76 1 



SEQ 0039 



{CLEAR ADDRESS FLAG 



;PRINT REGISTER HEADER 



jPRINT REGISTERS 



C/TEAE0 iMO.V U lb m// CM t 
C/Tt.Af.PU 06 -APR -84 09 5 45 



MACY11 30(1046) 06-APR-84 



M7 

09 s 48 PAGE 



77 



SEQ 0090 



37.94 












iDRIVE 


CLEAR SUBROUTINE 


********* 


3595« 


















3396 


015670 


000240 






ORVCLR: 


NOP 






33^ .' 


015672 


012704 


040000 






MOV 


#40000. R4 




3398 


0156 76 


005304 






XDi 


DEC 


R4 




3399 


015700 


001376 








BNE 


DCD 


(DELAY 


3400 


015702 


005037 


000662 






CLR 


PFLG 




3401 


015/06 


004737 


016124 






JSR 


PC, ATTN 


5 GO SEE Of ATTN SET 


3402 


015712 


012777 


000011 


162570 




MOV 


#ll.aCl 


{ISSUE DRIVE CLEAR 


3403 


015720 


005000 








CLP 


RO 




3404 


015722 


0327 77 


000200 


162572 


DCAj 


BIT 


#200, 3DS 


{SEE IF DRY 


3405 


015730 


001002 








BNE 


DCAO 




*;*06 


015732 


005300 








DEC 


PO 




'■'10 7 


015734 


001372 








BNE 


DCA 


{WAIT FOR DRY 


:>4cs 


015736 


0327 7 7 


040000 


162556 


DCAOj 


BIT 


#40000 ,aos 


{SEE IF ERR RESET 


34 OO 


015744 


001022 








BNE 


DCE 


I IF NOT; BR 


3410 


015746 


005777 


162552 






1ST 


qer 


iSEE IF ERROR REGISTER RESE 


34 1 1 


015752 


001017 








BNE 


DCE 


j IF NOT: BR 


341? 


015754 


005777 


162542 






TST 


aos 


{SEE IF ATA RESET 


3413 


015760 


100414 








BMI 


DCE 


{IF NOT; BR 


3414 


015762 


012703 


000001 






MOV 


#1,R3 


{SET TEST BIT 


34 15 


015766 


013704 


000620 






MOV 


DRVN.R4 


{GET DRIVE NUMBER £ BRANCH 


3416 


015772 


001403 








BEQ 


DCC 


{IF DRIVE 


3417 


0157 74 


006303 






DCB: 


ASL 


R3 


{POSITION TEST BIT PER DRIV 


3418 


015776 


005304 








DEC 


R4 


{SEE IF DONE 


3419 


016000 


001375 








BNE 


OCB 


{IF NOT; BR 


3420 


016002 


030377 


162520 




DCCs 


BIT 


R3,3AS 


{SEE IF AT TEN IS rtfcSkT 


3421 


016006 


001001 








BNE 


DCE 


;IF NOT ; BR 


342? 


016010 


000207 








RTS 


PC 


{RETURN 


3423 


















3424 


016012 


000240 






DCE: 


NOP 






3425 


016014 


032777 


020000 


162546 




BIT 


#20000 ,aswR 


jSF.l IF ERROR PRINT INHIBIT 


3426 


016022 


001017 








BNE 


DCEX 


{IF SO; BR 


342/ 


016024 


005737 


000614 






TST 


HDRFL. 


{SEE It PRINT HEADER 


3428 


016030 


001004 








BNE 


DCEA 


j IF NOT: BR 


34 29 


016032 


013704 


000616 






MOV 


EMAD0R.R4 




34 30 


016036 


004 737 


017760 






JSR 


PC.TTOUT 


{PRINT HEADER 


3431 


016042 


012704 


0230/3 




DCE A: 


MOV 


#MSG4 7,R4 




34 32 


016046 


004 73 7 


017760 






JSR 


PC.TTOUT 


jPRINT DRIVE CLEAR ERROR 


3435 


016052 


004737 


015534 






JSR 


PC.REGP 


{PRINT REGISTERS 


34 34 


016056 


005237 


000662 






INC 


PFLG 


{SET PRINTED FLAG 


34 35 


016062 


005 777 


162502 




DCF.X: 


TST 


bJSWR 


;SEE IF HALT ON ERROR 


34 36 


016066 


100001 








BPL 


DCEXA 


{IK NOT; BR 


34 3 7 


016070 


000000 








HAl T 






34 38 


016072 


005737 


000662 




DCEXAj 


TST 


PR.G 


{SEE IF HAVE PRTNTED 


3439 


016076 


001004 








BNE 


na xx 


{IF SO: BR 


3440 


016100 


0327 7/ 


020000 


162462 




BIT 


#20000, as WR 


{BRANCH IF ERROR 


344 1 


016106 


001741 








BEQ 


DCE 


{PRINTOUT DESIRED 


3442 


016110 


000240 






DCEXX; 


NOP 






344'. 


016112 


012737 


0156/0 


000706 




MOV 


#DRvCl R.SCOLP 


{SET SCOPE I OOP ADDRESS 


3444 


016120 


000137 


016550 






JMP 


SCOPE 


{GO DO SCOPE LOOP 



NUMBER 



N10 



C/1LALO TM03 
C/TLAL.P11 



TK16' 1U/7 CTl. I 
06-APR-84 09:45 



MACU1 50(1046) 06 APR-84 09;48 PAGF 89-8 
CROSS REFERENCE TABLE -- USER SYMBOLS 



StCJ 0130 



MS(i^8 
MS l>6 9 

msg ; 

NSUtt 
MSG8A 
MS09 
MSI. II 
MSI. TIC 
MSLT11 
MSLT12 
MSL T13 
MSI. 114 
MSI H5 
MSI. 1 In 
HSL T 1 -* 
MSLT2 
MSLT20 
MSL.T21 
MSI 122 
MSLT23 
MSLT24 
MSL T 25 
MSL T 26 
M51.T27 
MSLT3 
MSL 130 
MSLT31 
MSL 132 
MSI 135 
MSL 134 
MSLT35 
MSL136 
MSL13/ 
MSL 14 
MSL 140 
MSL 141 
MSL 142 
MSL143 



MSL 

nst 

MSL 



T44 
T45 
T46 



MSL 14 7 
MSLT5 

MSL ISO 

msl rsi 

MSL 1 6 
MSL T / 
MS5/A 
MTTN1 

NONSTD 

NOST 

NR/Of- 

NXTDHv 

NX 151 V 

OCTP 

OCTPF. 



023/30 
024002 
021454 

0214 72 
021533 
021662 
024012 
024 501 
02455/ 
024624 
0246 75 

024 742 
025051 
025141 
025230 
024066 
025311 
025370 
025424 
025461 
025526 
025566 
025622 
025656 
024145 
025712 

025 750 
026004 
026040 
026074 
026150 
026175 
026242 
024232 
026310 
026355 
026424 
026460 
026514 
026574 
026656 
02S712 
024 314 

026 762 
02 7042 
024 565 
0244 32 
023356 
017246 
001020 
OU.6 70 
000656 
002336 
002410 
020172 
020162 



1915 


40304 






1911 


40314 






3330 


39714 






1878 


39724 






1876 


39/34 






1932 


39754 






1745 


4034 4 






2033 


40414 






2060 


40424 






2101 


40434 






2133 


40444 






2160 


40454 






2183 


40464 






220* 


40474 






2231 


40484 






1798 


40354 






2256 


40494 






2285 


40504 






2315 


40514 






2339 


40524 






2364 


40534 






2422 


40544 






244 / 


40554 






2491 


40564 






1834 


40364 






2513 


40574 






256 / 


40584 






2715 


40594 




» 


2752 


40604 






27/0 


40614 






2/93 


40624 






2818 


40634 






2839 


40644 






1931 


40374 






2867 


40654 






2890 


40664 






294 1 


4067 4 






299/ 


4068V 






3038 


40694 






3084 


40704 






3129 


40714 






3169 


40 724 






1941 


40384 






3202 


40/34 






3234 


40 74 4 






1981 


40394 






2008 


40404 






162/ 


40194 






1334 


1613 36544 






1451& 








1636 


35704 






14024 








17004 








1/004 


1 /;?h 






159/ 


;60'> 1640 1649 


1658 


1668 


3342 


3346 3371 3573 


3375 


53 7 7 



1 / 50 
33 /9 



3524 


3V»3 


350 / 


3511 


35 l * 


3852» 


3381 


3383 


3385 


338T 


5559 


582tf4 



C/TEAEO TM05 
C/TEAE ( PU 



U lb U' 
06 APR 



tt4 09 5 45 



MACtll 30C 104b) 06 APR -an 09}4H PACK 79 



SEQ 009;' 



3488 
348* 
?4**0 
34*1 

34 *V 
3495 
34<*4 
34<»5 
34<H» 
34** 7 
34*8 
34** 
3500 
3501 
3502 
3503 
35C4 
3505 
3506 
3 SO 7 
3508 
350* 
3S10 
3511 
S5U 
3S13 
3514 
3515 
351* 
351- 
3518 
3519 
3520 
35.? 1 
3522 
352 3 
SW4 
5W5 
3526 
3 V ' 
3528 
352* 

35 30 
35 31 

35 32 
35 3 3 
3534 
35 35 
35 36 
V.3.' 
35 3H 
35 3* 
354" 
354 1 
354, 
354' 



016330 
016336 
016340 
016344 
016352 
016354 
016360 
01636c' 
016366 



016400 
016404 
016410 
016414 
01641b 
016422 
016426 
0164 30 
0164 34 
C16440 
016444 
016446 
016452 
016460 
016462 
016466 

0164 72 
016476 
016502 
016506 
016510 
016514 
016516 
016520 
016524 
016526 
016534 

0165 36 
016540 
016544 



016550 

016552 

016560 

016562 

016564 

016566 

C 165/0 

0165.5 

0165/4 



01273/ 
000240 
00503 7 
032777 
001055 
005 73 7 
001004 
013 704 
004 737 



016372 012737 



013/04 

004 73 7 

005 73/ 
001016 
012704 
004 73/ 
010103 
00473/ 
012 704 
004 73 7 
010203 
004737 
03277/ 
001010 
012704 
004737 
013703 

004 73/ 
00523/ 
000240 

005 77? 
100001 
000000 
00573/ 
001004 
032777 
00170/ 
000240 
00503/ 
00013/ 



O00240 
032/// 
001001 
00020 / 
000240 
005 V6 
00024 
00024 
0001 / ' 



00000 1 

000662 
020000 

000614 

000616 
017/60 
000001 
000666 
01 7 760 
000 732 

021755 

017760 

020172 
021764 
017760 

020172 
004000 

022026 
01 ^760 
0006 76 
020172 
000662 

162054 



000662 
020000 



000 ? 32 
016550 



040000 



000/32 I TGER2: 
I. TOF.Rli 



162216 



162034 



l.TGlAi 



000614 l.TClBi 



162110 LTGlTi 



I TG1C: 
LTGlXt 



I TlilXl: 



I TGlxx. 



flOGIC TEST REGISTER BIT ERROR SU&RQUTIINE ♦ + ♦*♦♦♦♦♦* 

jSFi FLAG 



MOV 
NOP 

CIR 

Bir 

BNE 

TST 

BNE 

MOV 

JSR 

MOV 

MOV 

JSP 

1ST 

BNE 

MOV 

JSR 

MOV 

JSR 

MOV 

JSR 

MOV 

JSR 

BIT 

BNE 

MOV 

JSR 

MOV 

JSR 

INC 

NOP 

TST 

BPl 

HAl T 

TST 

BNt 

BIT 

Bt.U 

NOP 

Cl.R 
JMP 



Ol.PEXEl 

PFIG 

020000 ,»SWR 

L.TG1X 

HORPL 

LTG1B 

EMADDR.R4 

PC.TTOUT 

91.HDWI 

t-.RADD.R4 

PC. T TOUT 

PC XF I 

LTG1T 

OMSG12.R4 

PC, rrouT 

R1.R3 

PC.OCTP 

OMSG15.R4 

PC, T TOUT 

R2.R3 

PC.OCTP 

04000, 3SWR 

LTGlC 
OM5G16.R4 
PC. TOUT 
ITCNT.R3 
PC.OCTP 

pug 

bJSWR 
I TGI XI 

PF I U 

LTGlXX 

020000 , HJSWR 
1 TtilA 

PI *F i 

SCOPE 



iCLEAR PRINT EL Af, 
I BRANCH IF ERROR 
jPRINTOUT OF SIRED 
1 SEE IF PRINT HEADER 
I IF NOT: 3R 

(PRINT HEADER 
I SET FLAG 

jPRINT ERROR CODF 

I SEP IF PRINT EXPT RCVD 

I IF NOT: BR 

jPRINT EXPT FAG 

jPRINT F XPT 

jPRINT RCV'i TAG 

jPRINT RCVI) 



jPRINT ITERATION 



l IF NO I MOP ON ERROR; MR 



j IF HAvt PRINTED} HR 



|Ct EAR \ xpt RCVO Fl 'U, 
j (JO TO SCOPE 



l SCOPE i OOP ON ERROR SUBROUTINE 



162106 





SCOPE: 


NOP 




162010 




HP 


040000, M5WR 






HNl 


IF 






NT', 


PC 




111 


NOP 








1ST 


I '.F 1 ). 






NOP 








nop 








JMP 


WSCUl P 



I SEE I» I OOP on error 
I IF SO: HR 

1 1 1 IE \ x l T 

I Hi 51 T STACK 

I I OOP M i MROR 



( ) 



c:n At o 


TM05-TI 


Lb IU7 7 


CH I 


MAC Hi 


c/n At , 


PU Ob -APR «4 


0^45 




5544 










5545 










3546 


01 6600 


0327 7 7 


004000 


161762 


354 ; 


016606 


001403 






3548 


016610 


005037 


0006 76 




JM4 


016614 


000?07 






5550 


016616 


005 73/ 


001014 




3551 


016622 


001? 7? 






355? 


0166?4 


00523 7 


0006 76 




3553 


016630 


023737 


0006 76 


00060? 


3554 


016636 


001764 






3555 


016640 


005 726 






355t* 


01664? 


017 700 


162042 




355 * 


016646 


000110 






3558 










355-* 










3560 










5561 


016650 


000240 






3562 


01665? 


012/04 


022617 




35b 3 


016656 


004 737 


017760 




3564 


01666? 


000000 






35b5 


016664 


000137 


002530 




3566 










356 * 










3568 










356 c > 










3570 


016670 


01004t 






35/1 


01667? 


012700 


000?40 




3b 7? 


016676 


013760 


001326 


001056 


35 7? 


016/04 


005 720 






3574 


016 706 


012 757 


00004 7 


001 MO 


3575 


016714 


013 760 


001330 


001056 


35 7ft 


016*?? 


012600 






35 7" 


016724 


OC020 7 






3578 











5(H1046) 06 APR 84 0<#j48 PAtil t*4 ■ I 



,t.U 0093 



ITtR: 

It: 
2$: 



INMT; 



NOSTj 



I T I- *; T ITERATION SDHROUTINf ♦♦♦*♦♦♦♦♦♦ 



HI! 


04000, 85WR 


BEQ 


21 


CLM 


HCNT 


MIS 


PC 


TST 


PCNTR 


BEQ 


11 


INC 


ITCNT 


CMP 


ITCNT.IIAMT 


BEQ 


1$ 


TS! 


( SP » ♦ 


MOV 


,j;U*..:\F.0 


JMP 


(WO) 


I MANUAL 


INTf'WfNflO 


NOP 




MOV 


OM5C.4 5,R4 


JSR 


PC, T TOUT 


HAL T 




JMP 


T5C0? 



SEE If ITERATIONS 

IF SO: BR 

CLEAR ITERATION COUNTER 

ELSE EXIT 

NO SUBTEST ITERATIONS ON FIRST PASS 

BUMP COUNTER 

SIT IF DONE ALL 

U SO: BR 

RESET STACK 

SET ITERATION POINTER 

GO ITERATE 



I GO PPINT INHltt MSCi 
;RE TURN TO SCHt'l) 



I NON STANDARD MrtDt TEST HANDIER 

mov ro. csr , » ;ave ro 

MOV 0240 JK 1 i»SET UP INDEX 

MOV TADX, TSi .*Ji i'Ki') j * 

TST (. R0)» 

MOV 04 7, ft /V. ' , ♦ St T END 0> TT ST 

MOV Tl AST , T* TTHt CRO) j ♦ if T LAST TEST NUMBER 

MOV CSP).,RO ;.RtSTORt RO 

RTS PC i 'RETURN 







w 



CJTEAEO 1N03 
C/Tt At .Pll 



n Ui tu/.' en. i 

Ob APR 84 09*45 



5580 
3581 

3582 

3583 
358 r * 

3587 

3588 
3589 

35**0 

35*U 
3592 

3^9? 
3594 

srw 

3597 

35^8 
3599 
3600 
3601 
3602 
360? 
5604 
3605 
3606 
3607 
3603 
3609 

3610 
3611 
3612 
3613 
5614 
3615 
3616 
3617 
3618 
3619 
3620 
3621 
3622 
3623 
5624 
3625 
3626 
362 7 
3628 
3629 
3650 
3651 
36 5 2 
36 5 5 
36 '-4 



016 72b 

016/30 
01b 73b 
016744 
016 752 



016 754 

016 "60 
016766 



01t,770 
016774 

017002 



017004 

017010 
017016 
017024 
017032 
017036 
017042 
017046 
017050 
017056 
017060 
017062 
017070 
017072 
017100 
017106 
017110 
017116 
017120 
017126 
017134 
017136 
01 7144 
01/152 
017154 
017162 
017164 

oi /1/2 

0W176 



000240 
012777 
015777 
013777 
00020 7 



015746 
012737 
000410 



013746 
012737 
000402 



013746 
012777 
013777 
013777 
013746 
042716 
022726 
001005 
032777 
001420 
000404 
032777 
001013 
012777 
032777 
0017 74 
032777 
001374 
053777 
032777 
001407 
012777 
052777 
001/74 
052//7 
001574 
012/7/ 
01265/ 
00020 7 



000040 
000620 
000660 



0007 72 
001400 



000772 
002000 



0007 72 
000040 
000620 
000660 
0007 72 
17437/ 
001400 



000007 
000200 



000 7 72 
000002 

000025 

000200 

000020 

000011 
OOu / 72 



MAO 11 50(1046) 06 APR -84 09;48 PAGE 80 



SEQ 0094 



161562 

161554 
161570 



000772 



0007 72 



161502 
161474 
161510 



161410 

161414 



020000 161404 



161414 
161366 

161544 
161550 

161540 

161316 



I INITIALIZE SUBROUTINE********** 



INIT1: NOP 
MOV 

IN1T2: MOV 
MOV 
RT5 



040,QC:> 
DRVN.aCS 

SLVN.KTC 

PC 



jINIT 

iSCLECT DRIVE 
iSELECT SLAVE 
1 RE TURN 



{ROUTINES TO INITIALIZE SLAVE. THESE ROUTINES PLACE THE SLAVE 

jIN PROPER STATUS FOR THE CAM INC. TEST. INIT3 PLACES THE 51 AVE IN 

} NRZ MODE AND OM B01 i INIT4 PLACES THE SLAVE IN PE MODE AND OFF 

iBOT. IF THE SLAVE IS IN THE PROPER STATUS ON ENTRY NO ACTION IS TAKEN 



j SET SLAVE IN 
INIT3; MOV 
MOV 
BR 

j SET SLAVE IN 
INIT4: MOV 
MOV 
BR 



}THI 
• IT 

INIT 
INIT 



5: 



000040 161444 



000040 161452 1$: 



2$: 

20$ 

3«: 
4*: 

5$: 
6*; 



S ROUTINE 
IS ENTERED 
MOV 

MOV 

MOV 

MOV 

MOV 

BIC 

CMP 

BNE 

BIT 

BEG 

BR 

BIT 

BNE 

MOV 

BIT 

BEQ 

BIT 

BNE 

BIS 

BIT 

BEU 

MOV 

BIT 

BEQ 

BIT 

BNI 

MOV 

M()V 

RJS 



NR2 OFT BOT 
UOES, -(SP) 
O1400.U0ES 
INIT5 

PE OFT BOT 
UOES, -(SP) 
02000, UDES 
INIT5 

IS ENTERED AT 
AT INIT5 UHEN 
UOES, (SP) 

040, acs 

DRVN.QCS 
SLVN.STC 
UOES, (SP) 
01743/7, (SP) 
01400, (SP)* 
1* 

040, aos 

4t 
2* 

040,305 

4$ 
O/.oJCl 

0200, 5)0 S 
20$ 

020000, aos 

5$ 

UOES.olTC 
O.'.WOS 

M 

025 , aC 1 



;SAVE TEST'S UNIT DESCRIPTION 
tSET UNIT DESCRIPTION * NRZ 
iGO TO INIT5 ROUTINE 



iSAVE TEST'S UNIT DESRIPTION 
j SET UNIT DESRIPTION * PE 
l GO DO IT 



INIT UHEN THE CALLER HAS SETUP 
EITHER INIT3 OR INI14 HAS SET 
jSAVE TEST'S UNIT DESRIPTION 
i INIT CONTROLLER 
j SELECT TM03 DRIVE 
(SELECT TE16 SLAVE 
jGET SLAVE DESCRIPTION 
i CLEAR ALL BUT DENSI Tr SELECT 
jBRANCH IF REQUESTING PE MODE 



UDES. 

UP UDES 



BITS 



j BRANCH IF SI AVE IS IN NRZ MODE 
|(PES - 0) 

jBRANCH rF SLAVE IS IN PE MODI 

{REWIND SLAVE 
jWAIT FOR READi 

j WAIT UNTIL PIP CLEARS 

I LOAD SLAVE DESRIPTION 
I BRANCH IF NOT AT B0 T 

{ERASE TO GET OFF HOT 
j WAIT FOR READl 



0200, q)DS 

5 J 

020,o)OS jWAIT FOP SE.TTIEUOWN TO Cl EAR 

6$ 

Oll.aCl |R* Si T DRIVF 

(SP)*,UOES iRf STORE UNIT 015RIPU0N 

PC i RE TURN 



CTTEAEO TM03-TE16 TU77 CTL I 
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C2TTEAE ,PH 



5b3b 

363 ; 

3b 58 
3b 39 
3640 

364 1 
364,? 
364 3 
3644 



Ob-APR-84 09:45 



3b45 
3646 
3b4? 
3643 
3649 
3650 
3651 
365.? 
3653 
3654 
3655 
3656 
3657 
3656 
3659 
3660 
3661 
3662 
3663 
3664 
3665 
3666 
366? 
3668 
3669 
3670 
3671 
3672 
3673 
3674 
36 75 
36 76 
36 7 7 
36 78 
3679 



017, 

017, 



!00 000240 



:o2 

'06 



01 

017212 

017516 

017222 

017226 

017232 

017236 

017242 

017244 



017246 
017250 
017254 



017256 
017262 
017266 
017272 
017274 
017300 
017302 
017506 
017310 
017314 
017320 
017322 
017330 
017332 
017340 
017344 
017350 
0W554 
017360 
017364 



004737 
012704 

004737 
012705 
012701 
012702 
012703 
004 737 
000240 
000207 



000240 
013716 
000002 



017746 
042716 
122716 
001010 
005737 
001005 
005077 
000005 
000137 
122716 
001017 
022737 
001016 
012737 
004737 
012704 
004737 
004 7 57 
122 716 
001006 



017 760 
02 7122 
017760 
0006 74 
000001 
177777 
000000 
017436 



000664 



161312 
000200 
000003 

00142c 

161260 

000200 
000001 

000176 

177570 

020716 
023614 
017760 
020740 
000007 



SEQ 0095 



INST 



MTINT: 



TTINT 



1* 



000570 
000570 



j MANUAL INSTRUCTION SUBROUTINE********* * 

jPRINT INSTRUCTION 
{PRINT REPl Y 

j AWAIT REPLY 
jEXIT 



2* 



NOP 




JSR 


PC, T TOUT 


MOV 


0MMSG0,R4 


JSR 


PC.TTOUT 


MOV 


0TEMP3.R5 


MOV 


n.Ri 


MOV 


0-1, R2 


MOV 


tfO, R3 


JSR 


PC.TTR 


NOP 




RTS 


PC 


;MAG 


TAPE INTERRUPT 


NOP 




MOV 


RTRN.(SP) 


RTI 




;TTY 


INTERRUPT HANDi 


MOV 


STKB, (SP) 


BIC 


0200, (SP) 


CMPB 


03, (SP) 


BNE 


1$ 


1ST 


CHNFl.G 


BNE 


1$ 


CLR 


OPSW 


RESET 




JMP 


&0200 


CMPB 


01, (SP) 


BNE 


2$ 


CMP 


OSWREG.SWR 


BNE 


3$ 


MOV 


01/75 7CSWR 


JSR 


PC, .SAVE 


MOV 


0MSG63.R4 


JSR 


PC.TTOUT 


JSR 


PC, .Rfr STORE 


CMPB 


ti.\{ SP ) 


BNE 


4$ 



j SET RETURN FROM INTERUPT AUORESS 
{RETURN 



{GET CHARACTER 
{CLEAR PARITi BIT 

{BRANCH IF NOT CONTROL C 

{INHIBIT tc IF IN CHAIN MODE 

{CLEAR PSW 

{RESTART 

{BRANCH IF NOT tA 

{BRANCH IF USING HARUARE SWR 

j INVOKE HARDWARE 5WR 

{SAVE REGISTERS ON THE STACK 

{TiPE 'HARDWARE SWR IN USE* 

1 BRANCH IF NOT ^G 



C/TEAt.0 TN03-TE16- TU/.' CTL I 



CZTFAl-.Pll 



06-APR-84 09:45 



3681 
3682 
368? 
3684 
3685 
3686 
3687 
3688 
3689 
3690 
3691 
3t>92 
3693 



017366 
017374 
017400 
01740.? 
017406 
017410 
017416 
017420 
017424 
017426 
017432 
017434 



012737 
004737 
000414 
122/16 
001004 
112737 
000405 
122716 
001002 
105037 
005726 
000002 



MAO u 



000570 



000176 
020620 

000023 



00037 7 001352 

000021 

001332 







[ 


-8 




30( 1046) 


06 -APR 


-84 09:48 


PAGE 


81 


5$: 


MOV 


tfSWREG.SWR 




{INVOKE SOFTWARE SWR 




JSR 


PC.GTSWR 




{GET SWITCHES 




BR 


6$ 






4$: 


CMPB 


023, (SP) 




{SEE IF tS 




bne 


5$ 




{BRANCH IF NOT 




MOVB 


fr377,$CNTRLS 


{SET XOFF FLAG 




BR 


6$ 






5$: 


CMPB 


</21,(SP) 




;SEE IF tQ 




BNE 


6* 




{BRANCH IF NOT 




CLRB 


$CNTRLS 






6$: 


TST 

RTI 


(SP)> 




{POP CHARACTER OFF S 
♦RETURN 



SEQ 0096 



STACK 



C/UAl'O TM05 

c/Te.Ah.Pii 

3t^5 

369t> 

369: 

3t^vS 

36^9 

3700 

3 :o t 

JW 
3703 
3704 
3705 
3706 
370^ 
3708 
3 709 
3710 
3711 



Ttlb iu/; CU I 
06 -APR -84 09:45 



gh 
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SEQ 0097 



$t lc' 
3713 
3714 
3715 
3716 
3717 
3 718 
3719 
3 720 
3721 
3722 
3723 
3724 
3725 
3 726 
3727 
3728 
3729 
3730 
3731 
3732 
3733 
3734 
3735 
3736 
3737 
3 738 
3739 
3 740 
3 741 
3/42 
3743 
3 744 
3745 
3 746 
3/4 7 
3 74 8 
3 .'49 
3750 



017436 
017440 
017442 
017446 
017450 
017454 
017462 
017464 
017466 
017472 
017500 
017502 
017506 
017510 
017512 
017520 
017522 
017526 
017532 
017534 
017542 
017544 
017546 
017550 
017552 
017554 
017560 
017564 
017566 
017570 
017576 
017600 
017604 
017612 
017614 
017620 
017624 
01 /62b 
017630 



010146 
011601 
005037 
005000 
004737 
122737 
001003 
000005 
000137 
122737 
001004 
005737 
001471 
00C457 
122737 
001005 
012704 
004737 
000742 
122737 
001012 
000241 
006000 
006200 
006200 
012704 
004737 
005201 
000730 
122737 
101402 
000137 
122737 
101002 
000137 
005237 
006300 
00630C 
006500 



O0C670 

017716 
000003 



000200 
000015 

000670 



023544 
017760 



000060 

0176 76 

0000 70 

017*76 
0006 70 



000612 



TTR 
10$ 



1$: 



000612 11$ 



000025 000612 2$: 

023542 
017760 

000177 000612 21$ 



000612 3$: 

000612 4$ : 

b$: 



{TTy ENTRY SUBROUTINE; 

;THIS SUBROUTINE IB USED BY THE TEST CONDITION 

{ENTRY ROUTINE TO READ THE RESPONSE ENTERED 

; AT THE TTY AND CHECK THEM FOR LEGALITY AND 

;LIMITS» ALL RESPONSE MUST BE TYPED IN OCTAL 

;(0~7) AND MUST FALL WITHIN THE LIMITS SET Br 

{THE CALLING ROUTINE. 

{IF AN ENTRY IS ILLEGAL OR OUTSIDE THE LIMITS, 

{A QUESTICN MARK IS TYPED (?) AND THE RESPONSE 

{MAY BE REENTERED. 

{ENTRIES MAY NOT EXCEED SIX (6) CHARACTERS AND 

{MAY BE TERMINATED AT LESS THAN SIX By TYPING A 

{CARRIAGE RETURN 

. **** + ******* + **♦** + ■** + + ***** + + + ***** + + + + + * + ******* + a* 



MOV 

MOV 

CLR 

CLR 

JSR 

CMPB 

BNE 

RESET 

JMP 

CMPB 

BNE 

TST 

BEQ 

RR 

CMPB 

BNE 

MOV 

JSR 

BR 

CMPB 

BNE 

CLC 

ROR 

ASR 

ASR 

MOV 

JSR 

INC 

BR 

CMPB 

Hi OS 

JMP 

CMPB 

BHl 

JMP 

[NC 

ASI 

A-il 

ASL 



Rl, -CSP) 
CSP),R1 

TEMPI 
RO 

PC.TTIN 
#3, TIB 
11$ 

30200 

015, TIB 

2$ 

TEMPI 

9$ 

6$ 

025, TIB 

21$ 

0MSG59.R4 

PC. T TOUT 

10$ 

01/7, TIB 

3$ 

RO 

RO 

RO 

OMSt.60.R4 

PC ,T TOUT 

Rl 

1 $ 

0^0, TIB 

4$ 

UNER 

070, TIB 

5$ 

TINER 

HMP1 

RO 

HO 

RO 



{SAVE CHARACTER COUNT 

{RESTORE CHARACTER COUNT (FOR tij) 

{CLEAR FIRST CHARACTER FLAG 

{GO READ CHARACTER 
{BRANCH IF NOT tC 

{RESET 

{RESTART PROGRAM 

{SEE IF CR 

{IF NOT: BR 

{SEE IF f- IRST CHARACTER 

{IF SO: BR 

{BRANCH IF NOT CONTROL U 

jTlPE <CR^<LF> 

{BRANCH IF NOT RUBOUT* 

{REMOVE I AST CHAR 

;TiPl. -\ 

{DECREMENT CHARS RECEIVED COUNT 

(SEE V CHAR IS LESS THAN 

;IF NO' ; BR 

I El SE GO TO FRHUR 

j SEE If CHAR IS GREATER THAN 7 

} IF NO! : BR 

|H SE GO 10 ERROR 

{SET f IRST CHARACTER FLAG 

jSHIE T 3 LEFT 



cvn At o 


tmo3 TU6-- iu: ; 


CTt I 


MACU1 


30 ( 1046) 


06 APR 


-84 09:' 


1- 

58 


-K7 
PAGE 


8? 1 


CZTEAE. 


Pll 06 -APR 84 


0^:45 
















3:51 


01763.? 


04? 73 7 


17 7770 


00061? 




BIC 


0\ 777 70 


,TIB 




(STRIP ASCII 


3 75? 


017640 


053700 


00061? 






BIS 


TIB.RO 






{LOAD CHARACTER 


3753 


017644 


005301 








DEC 


Rl 






j SEE IF DONE 


3 : r >4 


017646 


001300 








BNE 


1* 






;IF NOT: 9R 


3:55 


017650 


o?ooo? 






b$: 


CMP 


R0.R2 






j SEE IF EXCEEDED MAXTMUM LIMIT 


3756 


017652 


10140? 








BIOS 


7i 






{IF NOT: BR 


3 757 


017654 


000137 


017676 






JMP 


TINER 






{ELSE GO TO ERROR 


3758 


017660 


0?0300 






7$: 


CMP 


R3.R0 






{SEE IF BROW MINIMUM LIMIT 


3 759 


0l7b62 


101402 








BLOS 


8* 






{IF NOT: BR 


3760 


017664 


00013 7 


0176/6 






JMP 


TINER 






j Ft SE GO TO ERROR 


3761 


017670 


010015 






8*: 


MOV 


R0.CR5) 






;l DAD VALUE 


3 :6? 


01767.* 


005 7?^ 






9$; 


TST 


^SP). 






{POP CHAR COUNT OF F STACK 


376? 


017674 


000207 








RTS 


PC 






{EXIT 


3764 























SEQ 0098 



' ) 



C/TMEO TM03 
C2TEAI ,P11 



Tt 16 It' 
06 -APR 



'.' en. i 

84 09;45 



3 7^t> 
5 76 : 
3768 

3 76^ 

3 7'0 
37^1 

3 7 7? 

5 7 " 3 
3 - "4 
3 7"S 

3 7 "6 

3 : ? 7 
3 ■' 78 
37 ,c » 
3 780 
3781 
3*82 
3 783 
3 784 
3"*8S 
3 786 
3767 
3 788 
3 789 
3 790 
3 791 
3 79? 
3793 
3 794 
3 795 
3 796 
379? 
3 798 
3 799 
3800 
3801 
380? 
380? 
3804 



017676 
017 702 
017 706 
017710 
017714 



01771b 
01 "7?? 
01 7 726 
01 7 730 
017 736 
017 744 



r»* 



/ j>. 



017756 



017 760 
017?64 
017/7? 
017 7/4 

020002 
020004 
020010 
02001? 
020020 
020024 
020030 
020034 
020040 
02004 2 
020044 
020052 
020056 



012 704 

004 737 

005 726 
162716 
000207 



0052 7 7 
105777 
100375 
017 737 
042737 
013737 
004 737 
000207 



112437 
122^.7 
001472 
122 737 
001403 
OC4 737 
000 763 
112737 
004 737 
012703 
005037 
004 73 7 
005303 
001372 
112737 
004 73 7 
000740 



022557 
017760 

000020 



160650 
160644 

160640 

00020C 
000612 
020060 



000610 
00004 3 

000045 

020060 

000015 

020060 
000004 
000610 
020060 



000012 
020060 
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FINER i 



TTIN: 



00061? 
00061? 
000610 



TTOUT s 



000610 
000610 

000610 



1$: 

21: 



000610 



SEQ 0099 



jin ENTRY ERROR SUBROUTINE******** * ♦ 



MOV 
JSR 
TST 
SUB 
RTS 



0MSG40.R4 
PC.TTOUT 
( SP ) » 
020, (SP) 
PC 



{PRINT? 

j POP CHAR COUNT t'll- F STACK 

jRESET SP TO START OF" VALUE ROUTINE 

sREDO VALUE ENTRY 



; TTY READ SUBROUTINE********** 



INC 
TSTB 

BPl. 
MOV 
BIC 
MOV 
JSR 
RTS 



h)TKS 
STKS 
IS 

STKB.TIB 
0200, TIB 
TIB.TOB 
PC, TOG 
PC 



j STRIP PAR IT 1 Hi i 

jMove Char to tt? 

j AND ECHO IT 



OUTPUT UFR 



TTY OUTPUT SUBROUTINE************ 



MOVB 

CMPH 

BEQ 

CMPB 

BEQ 

JSR 

BR 

MOVB 

JSR 

MOV 

Ct.R 

JSR 

DEC 

BNE 

MOVB 

JSR 

BR 



(R4)., TOR 

04 3, TOB 

TEX 

045. TOB 

1$ 

PC , TOG 

TTOUT 

015, TQB 

PC, TOG 

04 , R 5 

TOB 

PC. TOG 

R3 

?$ 

01, 

PC 



,TOB 

TOG 



j (HI 



[ W 



TTOUT 



C/Tt-AlO TM05 
C7TPAKPU 



H 16 Tl 
06 APR 



i ' 



.' CM. I 
84 0*0:45 



MACU1 



380^ 

380 : 

3808 
380$ 

3810 

?r ' i 
s*u2 
38;* 

"814 
3815 
3816 
08 17 
38 \o 
38 V> 
3820 
3821 
3822 
38.' 3 
3824 
3825 
3826 
382 7 

3828 
3829 

3830 
3831 
383? 
3833 
3834 
3835 
3836 
383" 
3858 
3839 
384 
3841 
3842 
384 3 
3844 
3845 
3846 
384 7 
384 8 
3849 
38 SO 
3*51 
3852 
38 S3 
38S4 
3855 
3856 
38S : 

38 S8 
3859 

3861 



020060 
020064 
020066 
020074 
020102 
020110 
020 U? 
O2C120 
020 i 22 
Cm C 130 

020 is;- 1 

O2013o 
020142 
020144 
020150 
020152 
020160 



020162 
020170 
020172 
020176 
020200 
020202 
020206 
020210 
020214 
020216 
020222 
020224 
020230 
020234 
020236 
020240 
020244 
020246 
020250 
020252 
020254 
020256 
020260 
020264 
020266 
0202 10 
0202 f? 
0202 /6 
020 300 
020302 
020 304 
020 506 
Or'0 31.' 
020314 



105777 
100024 
117737 
142737 
122737 
001004 
112/37 
000757 
122?37 
001002 
105037 
105737 
100746 
1057 77 
100343 
113 77 7 
000207 



012737 
000402 
00503 7 
010304 
00100b 
005 73 7 
001003 
004 737 
00044 7 
032704 
001405 
012 704 
004 737 
000403 
005004 
004737 
010304 
006004 
006004 
006004 
006004 
000304 
00473/ 
010304 
006004 
000304 
004/37 
010304 
006104 
006104 
000 304 
004 / 3 / 
010 '04 
006004 



160506 

160502 

000200 
000023 

000377 
000021 

001332 

001332 

160426 
000610 



000001 
020412 

020412 

020372 

100000 

000001 
020350 

020350 



020350 



020350 



020350 



001333 
001333 
001333 

001332 

001333 



160420 



30(1046) 


06 APR 


-84 09.-48 PAG 


TOG: 


TSTB 


8TKS 




BPl. 


3$ 




MOVB 


oHKB,$CNTRl.S»l 




BICB 


fl200,*CNTRi.$*l 




CMPB 


G23,$CNTRLS*1 




BNE 


2$ 




MOVB 


0377 t *CNTRl.S 




BR 


TOG 


2*: 


CMPB 


•2l,«CNTRLS*l 




BNE 


3$ 




Cl.RB 


JCNTRL.S 


3$: 


TSTB 


JCNTRl.S 




BMI 


FOG 




TSTB 


STPS 




BPl 


TOG 




MOVB 


TOB.STPB 


TfcX: 


RTS 


PC 



020412 



84 



{SEE IF" INPnr aT KEYBOARD 

j IF SO, THEN 

{MOVE CHARACTER AND 

j MASK OFF' PARITi BIT. 

} SEE IF CHARACTER IS XOFF 

I IF XOFF, THEN 

;SET XCFF FLAG 

j SEE IF CHARACTER IS XON 

j if SO THEN 

;CLEAR XOFF fLAG 

j SEE IF IN XOFF MODE 

S IF NOT THFN 

{CHECK IF PRINTER READt 



SbQ 0100 



j RE TURN 



SOCIAL OUTPUT SUBROUTINE************ 



CCTPE; 


MOV 


Ol.OFL 




BR 


0CTPE1 


OCTP: 


Cl.R 


OKI 


0CTPE1: 


MOV 


R3.H4 




BNE 


OCTPO 




TST 


OF I 




BNE 


OCTPO 




JSR 


PC.0CTPG1 




BR 


0CTP3 


OCTPO ? 


BIT 


01OO00O.R4 




BEQ 


0CTP1 




MOV 


#1. R4 




JSR 


pc.ocrpc 




BR 


0CTP2 


0CTP1: 


CLR 


R4 




JSR 


pc. octpi; 


0CTP2: 


MOV 


R 3 , R4 




ROR 


R4 




ROM 


R4 




ROR 


R4 




ROR 


k4 




SWAB 


R4 




JSR 


pc.octpg 




MOV 


U '. , R4 




ROR 


R4 




SWAB 


R4 




J',R 


pc.octpg 




MOV 


R3.H4 




Rill 


R4 




ROt 


R4 




5WAH 


R4 




JSR 


pc.ocrpci 




MOV 


H *■ , R4 




ROR 


R4 



jCt FAR Vi AG FOR I FADING ZERO 

{SEE IF NUMHFR IS ZERO 

j IF NOT ZERO: BR 

{SEE IF PRINT AH 

j IF SO : BR 

{ELSE PRINT ZERO 

{SPACE AND EXIT 

{SEE IF MSD * I 

{IF NOT: BR 

jPRIN! 1 
{PRINT o 



{POSIT [ON DIGIT 
{PRINT DIGIT 2 

{PRINT DIGIT 3 
jPRINI DIGIT 4 



< : 



CYH At 


1M0S It. 


lt> Tti/ * 


en. i 


cm .At . 


Pll Ob-APR-84 


09*45 


?a*o 


020316 


00b004 




386? 


020320 


006004 




5864 


020322 


004 737 


020350 


38b5 


020326 


010304 




38fob 


020330 


004 73 7 


020350 


386" 


020334 


012737 


000240 


3868 


020342 


004 73 7 


020060 


3869 


020346 


000207 




38 V 








38 '1 


020350 


042704 


17 77 70 


38 :? 


020354 


001004 




38 '3 


020356 


00573 7 


020412 


38 74 


0c03h2 


001001 




38 75 


020364 


00020 7 




38:t> 








38" 


020366 


00523 7 


020412 


38 '8 


020572 


052704 


000260 


38 » 


020376 


010437 


000610 


3880 


020402 


004737 


020060 


5881 


020406 


010304 




3882 


020410 


00020 7 




388^ 


020412 


000000 




3884 









MACU1 



OOOblO 



30(1046) 


Ob APR 84 09 j 48 




RUR 


R4 




ROR 


R4 




JSR 


PC.OCTPG 




MOV 


R3.R4 




JSR 


PC.OCTPG 


0CTP3: 


MOV 


tf240,T0B 




JSR 


PC , TOG 




RTS 


PC 


OCTPGj 


BIC 


#177770, R4 




BUI 


OCTPGO 




T5T 


OM 




BNfc. 


OCTPGO 




RTS 


PC 


OCTPGO: 


INC 


OFL 


OCTPGlt 


BIS 


,7260, R4 




MOV 


R4, TOO 




JSR 


PC, TOG 




MOV 


R3.R4 




RTS 


PC 


OFL: 








PAGK 84-1 



StU 0101 



{PRINT DIGIT 5 

; PRINT SPACt 
itXlT 



I FIRST CHAR I- LAG 



L8 



C/TEAEO 


1M03-Tt.lt. TU/V 


C1L I 


MACUt 


30(1046) 


06 APR -84 09t48 PAGE 


85 


CZTEAE. 


Pil 06-APR-»4 


09;45 












388b 


















388 7 












;DATA 


CHARACTER OUTPUT 


SUBROUTINE* ♦ ♦♦*+**** 


3888 


















3889 


020414 


012704 


000010 




DOUT: 


MOV 


i710,R4 


{SET NUMBER TO PRIN 


3890 


020420 


110337 


000610 






MOVB 


R3.T0B 




3891 


020424 


105777 


160146 




1$: 


TSTB 


SITPS 




3892 


020430 


100375 








BPL 


1$ 




3893 


0204 32 


132737 


000200 


000610 




BITB 


4200. TOB 




3894 


020440 


001404 








BEQ 


2$ 




3895 


02044 2 


01277 7 


000061 


160130 




MOV 


0O61.3TPB 




3896 


020450 


000403 








BR 


3$ 




389 7 


02045.: 


012777 


000060 


160120 


2$: 


MOV 


0060, STPB 




3898 


020460 


006337 


000610 




3$; 


ASL 


tob 




38^9 


020464 


005504 








DEC 


R4 




3900 


020466 


001356 








BNE 


1$ 




3901 


0204 70 


000207 








RTS 


PC 




3902 


















3903 


0204 72 


013703 


000674 




DOUTDi 


MOV 


TFMP3.R3 




3904 


0204 76 


000303 








SWAB 


R3 




3 90S 


020500 


004 73 7 


020414 






JSR 


PC, DOUT 




3906 


020504 


013703 


000674 






MOV 


TEMP3.R3 




3907 


020510 


004 737 


020414 






JSR 


PC, DOUT 




3908 


020514 


000207 








RTS 


PC 




^909 


















S910 












{TF.16 


SbRlAL NUMBER PRINT SUBROUTINE* *++* *+ 


3911 


















391? 


020516 


010304 






SNPT: 


MOV 


R3,R4 




3913 


020520 


000304 








SWAB 


R4 




3914 


02C522 


00600^ 








ROR 


R4 




3915 


020524 


006004 








ROR 


R4 




3916 


020526 


006004 








ROR 


R4 




3917 


020530 


006004 








ROR 


R4 


;GEI I IRST DIGIT 


3918 


020532 


004737 


020574 






JSR 


PC , SNPG 


jt'HtNl 


391.9 


020536 


010304 








MOV 


R5.R4 




3920 


020540 


000304 








SWAB 


R4 


; Lit-" T SECOND DIGIT 


3921 


020542 


004737 


020574 






JSR 


PC , SNPG 


;PR1NT 


3922 


020546 


010304 








MOV 


R3,R4 




3923 


020550 


006004 








ROR 


R4 




3924 


020552 


006004 








ROR 


R4 




3925 


020554 


006004 








ROR 


R4 




3926 


020556 


006004 








ROR 


R4 




392/ 


020560 


004 737 


020574 






JSR 


PC. SNPG 


{PRINT THIRD DIG. IT 


3928 


020564 


010304 








MOV 


R3.R4 




3929 


020566 


004 737 


020574 






JSR 


PC, SNPG 


{PRINT FOURTH DIGIT 


393C 


020572 


00020/ 








RTS 


PC 


; E \ 1 I 


3931 


020574 


012757 


000260 


000610 


SNPG: 


MOV 


it; 60, roB 


i'.t I BASE 


3932 


020602 


042 704 


177/60 






BIC 


.vi ///bO,R4 


;MAS DIGIT 


39 53 


020606 


0504 5 7 


000610 






BIS 


R4.10B 


jSEl ASCII 


3934 


02061? 


004/5/ 


020060 






JSR 


PC, TOG 


; T ipfc. DIGIT 


3935 


020616 


000207 








RTS 


PC 


{RETURN 



SEQ 0102 



M8 



c/n At.o 


ino3 it lb ni/; 


CM 1 


MACY11 


CZTEAE. 


PU 06-APR-84 


09:45 




393; 










3938 










3959 










3940 


020620 


022737 


000176 


0005 7C 


3941 


020626 


001032 






3942 


020630 


004737 


020716 




3943 


020634 


012704 


027473 




3944 


020640 


004 737 


017760 




3945 


020644 


017703 


157 720 




3946 


020650 


004737 


020162 




394 7 


020654 


012704 


027503 




3948 


020660 


004737 


017 760 




3949 


020664 


013705 


000570 




3950 


0206 70 


012701 


000007 




395 1 


020674 


012702 


1777 77 




3952 


020700 


012703 


000000 




3953 


020704 


004737 


01743b 




3954 


020710 


004737 


020740 




3955 


020714 


000207 






3956 










(1) 


020716 


010546 






(1) 


020720 


010446 






cn 


020722 


010346 






(i) 


020 724 


010246 






en 


020726 


010146 






(i) 


020730 


010046 






CD 


020732 


016646 


000014 




(1) 


020736 


000207 






CD 










3957 










(1) 


020 740 


012666 


000014 




(1) 


020744 


012600 






CD 


020746 


012601 






(D 


020750 


012602 






CD 


020752 


01260? 






CD 


020 754 


012604 






CD 


02C 7 56 


012605 






CD 


020760 


000207 






CD 










3953 










3959 










3960 










3961 


020762 


022445 


046524 


041460 




020770 


052055 


030505 


02/466 




020776 


052524 


033467 


041440 




021004 


047117 


051124 


046117 




021012 


046040 


04351/ 


041511 




021020 


052040 


051505 


026524 




C21026 


050040 


051101 


020124 




021034 


020111 


041450 


052132 




021042 


040505 


030105 


051 


3962 


02104 7 


045 


025052 


0404 52 




021054 


051523 


051125 


020105 




021062 


040524 


042520 


044440 




0210/0 


020123 


052101 


04104 




021076 


052117 


025052 


052 



06 -APR -84 09:48 PAGE 86 



SEU 0103 



{ROUTiNE TO L 
{IF A CONTROL 
GTSWR: CMP 

BNF. 
JSR 
MOV 
JSR 
MOV 
JSR 
MOV 
JSR 
MOV 
MOV 
MOV 
MOV 
JSR 
JSR 
U: RTS 
; {ROUTINE TO 
.SAVE: MOV 
MOV 
MOV 
MOV 

MOV 
MOV 
MOV 
RTS 



OAO CONTENTS OF" SOFTWARE SWITCH REGISTER, 
G CtG) IS TYPED THE SOFTWARE SWITCH REGISTER IS LOADED 



tfSWREG.SWR 
1* 

PC,. SAVE 
tf$MSWR,R4 
PC, T TOUT 
SSWR.R3 
PC.OCTPE 
4$MNEW,R4 
PC, T TOUT 
SWR,R5 
#/,Rl 

0177/77.R2 
40, R3 
PC.TTR 
PC, .RESTORE 
PC 
SAVE REGISTERS 



{BRANCH IF SOFTWARE SWR 
{NOT INVOKED 

{SAVE REGISTERS ON THE STACK 
{TYPE * SWR = ' 



{GET 
jAND 
j ASK 



CURRENT 
TYPE IV 
FOR NEW 



VALUE 
VALUE 



ON 



{NEW VALUE WILL BE RETURNED IN (R5) 
{LIMIT TO 7 CHARACTERS 
jLIMIT RESPONSE TO BETWEEN 
,0 AND 177777 
{GET RESPONSE 
{RESTORE REGISTERS 
{RETURN TO CALLER 
THE STACK 



*5, 
*4, 
*3, 
*2, 

*1. 

*0, 



-C5P) 
■CSP) 
-CSP) 
-CSP) 
-CSP) 
■-CSP) 



14CSP) 
PC 



-CSP) 



R5 
R4 
R3 
R2 
Rl 
RO 



IS 
IS 
IS 

IS 
IS 
IS 



PUSH 



SAVED 
SAVED 
SAVED 
SAVED 
SAVED 
SAVED 
RETURN 



AT 
AT 
AT 
AT 
AT 
AT 
PC 



12CSP) 

10CSP) 

6CSP) 

4C5P) 

2CSP) 

CSP) 

ON THE 



STACK 



RETURN TO CALLER 



; {ROUTINE TO RESTORE REGISTERS SAVED ON THE STACK 



RESTORE :MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
RTS 



CSP)*,14CSP) 
CSP)*, 40 
CSP); ,*1 
C SP ) * , *2 
CSP)*,«3 
CSP)»,*4 
CSP)f >5 
PC 



{{STORE RETURN PC ON STACK 



j {RETURN 



MSG1: 



; ME SS AGE T AOL E + * + + + + + *♦* 

.ASCII '**TM03-TEib/TU77 CONTROL LOGIC Tt... 



PART 1 UVTEAEO)' |»*B 



.ASCII /**++ASSURE TAPE 15 AT BQT+.**/ 



C/TLAKO TM03-TE16/TU/'/ CTL I 
CZTEAE.P11 06-APR-84 09:45 



5963 



3964 



3965 



3966 



3967 

39<>n 

3969 
3970 
3971 
39/2 



39/5 



021103 
021110 
02111.6 
021124 
021152 
021140 
021146 
021154 
021162 
021165 
021172 
021200 
021.206 
021214 
021222 
021226 
021234 
021242 
021250 
021256 
021257 
021264 
021272 
021300 
021306 
021314 
021322 
021330 
021336 
021341 
021352 
021355 
02136c 
021370 
021376 
021377 
021404 
021412 
021415 
0214^2 
0214 30 
021435 
021442 
02145-0 
021 A 54 
021462 
0214 70 
0214 72 
021500 
021506 
02 IS 14 
021522 
021530 
021533 
021340 
021546 



045 
036040 
04 7524 
044515 
051040 
051516 
041536 
042525 
022524 

045 
020105 
051105 
041450 
042510 
042516 
022445 
051104 
043101 
020123 

073 

0A5 
051105 
020124 
020105 
051105 
020114 
051522 
036125 
04 7040 
044530 
027124 

045 
054105 
051104 

04 3 

045 
052105 
020104 

045 
042040 
042524 

105 
04/516 
053103 
041522 
052117 
021524 
051445 
04 7040 
020122 
051103 
04 7105 
020105 

045 
051440 
040440 



054524 
051103 
052040 
040516 
051505 
020105 
052040 
052123 
04 3 
051104 
052516 
047440 
024522 
020116 
021440 
04 7506 
053111 
051104 
042524 

042440 
042440 
051104 
052516 
020054 
052117 
051440 
020104 
04/117 
052123 
04 3 
04 7516 
051511 
053111 



041505 
043 
046524 
052105 
020104 

050130 

020124 
021504 
042126 
042440 

040514 
046525 
05 11 j. 7 
020051 
042040 
043 
04 3045 
040514 
042104 



MACY11 30(1046) 



042520 
020076 
051105 
042524 
04 7520 
020046 
020117 
051101 



053111 
041115 
020122 
053440 
04 /504 

020122 
020105 
051505 
05212* 

052116 
050130 
053111 
041115 
046101 
042510 
04 7510 
042502 
042455 
(47101 

026516 
020124 
02C105 

042040 
042524 

031460 
041505 
04 3 
026524 
042522 

04 7055 

050130 

042526 
042502 
024040 
044127 
o : 7 1 1 7 

05111/ 
042526 
042522 



NK 

06 APR -84 09 ;46 PAGE 86-1 

ASCII /tfTYPE <CR*> TO TERMINATE: RESPONSE 6 tC TO RESTART*,'// 



SEQ 0104 



MSG2: 



ASCII /*DRIVE NUMBER OR CCR) WHEN DCNE 0/ 



MSG2A: .ASCII /rf*FOR DRIVE ADDRESS T ESTj/ 



ASCII /* ENTER EXPT DRIVE NUMBER, ALL OTHERS SHOULD BE NON -bXISTANT ,,'>/ 



MSG3: 

MSG4 : 
MSG5j 

MSG6: 
MSG7: 
MSG8 ; 



ASCII /*NON -EXIST DRIVE »/ 



ASCII /*RH DETECTED */ 



ASCII /*TM03 DF.TFCTFP #.' 



ASCII /EXPT -NOT RECVDtf/ 



ASCII /RCVD-NOT FXPU 



ASCII /*SLAVF NUMBER OR fCR) WHEN DONE if 



MSG8A 



ASCLI /**FOR SLAVE ADDRESS T E o T j 



C7H Af 


TM05 TF 


16 TIL'.' 


Cll I 


MACUl 


C/HAl * 


Pll 06 APR 84 


09j45 






021554 


051523 


052040 


051505 




021 56? 


035524 






59 "4 


021564 


020045 


047105 


042524 




021572 


020122 


054105 


052120 




021600 


051440 


040514 


042526 




o?i606 


04 7040 


046525 


0*250? 




021614 


026122 


040440 


046114 




021622 


04 7440 


044124 


051105 




021650 


020123 


044123 


05251 7 




0216 5b 


042114 


041040 


020105 




021644 


04 7516 


026516 


054105 




021652 


051511 


040524 


052116 




021*60 


021456 






3 9 '''I 


0216*2 


04 7045 


04 7 1 1 7 


042455 




0216/0 


044530 


052123 


051440 




021676 


040514 


042526 


021440 


5^ > 


02 1 "04 


051045 


040505 


020104 




021712 


047503 


052116 


041040 




021720 


051525 


050040 


051101 




021726 


021440 






59 7 7 


021730 


053445 


044522 


042524 




021736 


041440 


047117 


020124 




021744 


052502 


020123 


040520 




021752 


020122 


043 




59 78 


021755 
02176? 


040 
021440 


054105 


052120 


5979 


021764 
0217 72 


051040 
045 


O'j3103 


0201C4 


598v/ 


0217 73 


045 


051115 


041040 




022000 


052111 


020123 


026464 




022006 


021460 






5981 


022010 


046445 


020122 


044502 




022016 


051524 


030440 


026465 




022024 


02146 7 






«9M? 


022026 
022034 


044445 

021440 


042524 


035122 


5985 


022036 


052045 


020103 


044502 




022044 


051524 


030440 


026462 




022052 


020060 


043 




5984 


022U55 


045 


041506 


041040 




02206? 


052111 


020123 


052461 




0220 70 


030055 


021440 




5985 


0220 74 


043045 


047125 


041440 




022102 


042117 


020105 


044502 




022110 


051524 


032440 


030455 




022116 


04 7440 


020106 


030503 




022124 


021440 






5986 


022126 


04 5445 


020117 


044502 




02? 154 


020124 


047516 


020124 




022142 


04/503 


051122 


041505 




02? 150 


020124 


053101 


051*40 




02215** 


040524 


052122 


0?144o 


'.98 ' 


022164 


04 5445 


O20U7 


04450? 




02217? 


0?0i?4 


04/516 


0?01?4 




o???oo 


0425?! 


0?01,'4 


kiA 1 


»/*88 


0«V?05 


045 


04 750 7 


041040 



301 1046) 06 APR 84 09}48 



PAUL 



86 



Sf-.fJ 0105 



.ASCII /* tNTF-R F.XPT 51 AVF NUMBFR, All UIHFRS SHOULD Hf NON FXI5TANT.0/ 



MSG9j .ASCII /«NON f- XfVT SI AvF 0' 

MSG10: .ASCII /*«F.AD CONT BUS ^AR 0/ 

MSGlli .ASCII /HWRITF CONT BUS PAR 0/ 

MSG12: .ASCII / F.XPT ' 

MSG15: .ASCII / RCVl) 0' 

MSG14: .ASCII /*MR BITS 4 00' 

MSG15: .ASCII /*MR BITS If. 70/ 

MSG16: , ASCII /«ITtR: o 

MSG18: .ASCII '#TC BITS 1? a 

MSG19: .ASCII /«F C BIT 1 . IS O tf 

MSG20I .ASCII /*HJN COOK BIT'. *• 1 OF Cl 

MSG21: .ASCII /«i»UHIT NUT CORRF- C F AT START o 

MM,?.'! .ASCI I /«tl,U FJI ! NOT .F ! » 

M' ,(,?'.! .ASCII /*(■() HI I NOT WF st 1 Ft» INM it 



c:\\ wo 


I NO 5 It 


n> in/ 7 


CU. 1 


MAC l 1 1 


C2U A* . 


PI 1 06 APR ,H4 


09*45 






OtWl.) 


052 til 


04 7040 


052 li ' 




o.wvo 


051040 


051^05 


052105 




022226 


041040 


020131 


04/111 




022254 


052111 


021440 




$W* 


022240 


042045 


054522 


04 7040 




022246 


052117 


051440 


052105 




022254 


041040 


020131 


04 7 1 1 1 




022262 


052111 


021440 




V«0 


022266 


042045 


054522 


04/040 




022274 


052117 


051040 


051505 




02."? SOP 


052105 


041040 


020131 




022510 


04 7507 


0304 75 


04 3 


VJQ1 


022515 


045 


051104 


020131 




022322 


047516 


020124 


042523 




022350 


020124 


054502 


04 3440 




02255b 


056517 


021460 




3^92 


02234,_ 


047045 


02011/ 


047U1 




022550 


042524 


051122 


050125 




022356 


020124 


042522 


052524 




022364 


047122 


042105 


04 3 


5995 


022371 


045 


040502 


020104 




022576 


052125 


052101 


051525 




022404 


04 5 






5994 


022405 
022*12 


040 
045 


04 7123 


020072 


5995 


022413 


045 


051105 


020122 




022420 


04 7516 


020124 


042523 




022426 


020124 


04 3 




399* 


022451 


045 


052101 


020101 




022456 


04 7516 


020124 


042523 




022444 


020124 


043 




599 7 


02244 7 


045 


051501 


041040 




022454 


052111 


04 7040 


052117 




022462 


051440 


052105 


021440 


59^8 


0224 70 


051445 


020103 


04 7516 




022476 


020124 


042523 


020124 




022504 


045 






3999 


022505 


045 


051124 


020105 




022512 


047516 


020124 


042523 




022520 


020124 


04 3 




4000 


022525 


045 


046123 


020101 




022550 


04 7516 


020124 


042523 




022556 


020124 


04 3 




4001 


022541 


045 


051523 


020103 




022546 


04 7516 


020124 


042523 




022554 


020124 


04 3 




400c 


02255/ 


040 


0200 7 / 


04 3 


4003 


02256 5 


045 


042445 


042116 




022570 


04 7440 


020 i 06 


040520 




0225 76 


051525 


021440 




4004 


022602 


042045 


040505 


020104 




0226 10 


051124 


041501 


020113 




022616 


04 5 






4005 


02261/ 


045 


046445 


04/101 




022624 


040525 


020114 


042524 




0226 52 


052123 


020123 


50450 



MAC ill 30(1046) 06 APR H4 09j4H PAtil 86 4 



>F.O 0106 



MSG24: .ASCII '*DRt NOT SET Rt INI T 0/ 

M5G25} .ASCII /*DR> NOT RfcSF.T RY GO- 10/ 

M5G25A: .ASCII 'KDRi NOT SfcT Bi GO-00/ 

MSG26j .ASCII /UNO INTERRUPT RETURNED*)/ 

MSG27; .ASCII /*DAD STATU!**/ 

MSG30: .ASCII / SN: 0/ 

MSG31; .ASCII /*ERR NOT SF T Q/ 

MSG32: .ASCII /«ATA NOT SF T 0/ 

MSG33: .ASCII /MAS HIT NOT SF T 

MSG34: .ASCII /*SC NOT St T 0/ 

MSG35: .ASCII /*TRh NOT St T > 

MSG36: .ASCII /rtSlANOT Sf- I o ■ 

MSG37: .ASCII /i(SSC NOT St T a; 



MSG40: .ASCII ." 

MSG41: .ASCII >**FNU Of PASS Q 



MSG42: .ASCII /*»F Al> TRACK o 



M5G44j .ASCII '**MANUAl II 1 .!', v 14 1 ' ) INHIHIHD: HAt T» 



C-MtAtO 1M05 
CZTEAE..P11 



U.lt» K'.*.' CU I 
06-APR 84 09*45 



MAC >ll 30U04tO 06 APR -84 09$48 PAGE 86 4 



SF.Q 0107 



400b 



400 : 



4008 



4009 



4010 
4011 

40U? 

4013 

4014 
4015 
4016 



022646 
022654 

022662 
022666 
0226 74 
02270? 
022 710 
022 716 
022 725 
022730 



022745 
022752 

022 760 
022766 
02276 7 
022 7 74 
023002 
023010 
023016 
023024 
023032 
023040 
023046 
023053 
023060 
023066 
023073 
023100 
023106 
023114 
023122 
023125 
023132 
023140 
023144 
023152 
023160 
023166 
023173 
023200 
023205 
023212 
023216 
023224 
023232 
02 3240 
023246 
023254 
023262 
02 32 70 
02 32 76 
023304 
025312 



026464 
047111 
042524 
046101 
042522 
052103 
050040 
041440 
052516 

045 
05212? 
040524 

043 

045 
051117 
042522 

043 

045 
020040 
020040 
020040 
020103 
051503 
042040 
020040 
020040 

040 
051115 
052040 

045 
042522 
054502 
042526 
051101 

045 
020101 
042523 
052445 
041505 
051105 
044502 

045 
051114 

045 
045503 
051445 
042440 
020072 
020113 
030040 
020110 
04 7522 
044507 
052123 
042524 

043 



033461 
044510 
035104 
022524 
042523 
040440 
042522 
047117 
022505 
042522 
051105 
052122 

042526 
040440 
051523 

051503 

053440 
020040 
020040 
020040 
020062 
020123 
051105 
040440 
020040 
020040 
022503 
047516 
042523 
042040 
041440 
043 
046101 
047516 
021524 
042516 
042524 
04 7522 
051524 
040502 
020103 
040502 
021440 
052105 
051122 
044103 
051127 
053440 
04 7503 
020114 
020103 
044440 
052123 



.ASCII /RESELECT AND PRESS CONTINUED/ 



MSG45.- .ASCII /^VECTOR ADDRESS: 0/ 



MSG46: .ASCII /*CS1 WC 



BA 



.ASCII / 



HR 



TW 



020051 
044502 
044040 

042514 
042116 
051523 
044524 

043 
044507 MSG44; .ASCII /^REGISTER START • 0/ 
051440 
0200 72 

052103 
042104 
020072 

020061 
020103 
040502 
04 3040 
020040 
020040 
020040 
020040 

123 
020040 
020040 

043 
020124 
020124 
044522 
042514 

044120 
020124 

050130 
020104 
020122 

04 3 
020104 

043 
020104 

050125 
051117 
041505 
050101 
052111 
052116 
04 7514 
042524 
020111 
033440 



FT 



CS2 DS 



ER 



AS/ 



MSG4 7 

MSG50 
MSG51 

HSG53 
MSG54 
MSG55 



.ASCII /*NOT RESfcT Bt URlVfc CI EAR*/ 

.ASCII /tf ALPHA NOT SFTtf/ 

.ASCII /*UNEXPECTFD ERROR BITSfl- 

.ASCII /*BAD IRC <>/ 

.ASCII /*HAD Ci' 0-' 

.ASCII /*!H TUP ERROR; CHECK WRAP UlTH CONTROL LOGIC TEST II TfcST :'i> 



C/UAl.O I MO 5 
C2U. At", PU 



U It* TU/7 CM. I 
Ob-APR-84 09:45 



MAC 111 50(1046) 06 APR -84 09;48 °AGE 86 5 



3EQ 0108 



4017 

4018 
4019 



4020 



4021 



4022 
4023 
4024 



4025 



4026 



402/ 
4028 
4029 



4030 



023313 

023320 
023326 
023334 
023340 
023346 
023354 
023356 
023364 
023372 
023400 
023406 
023414 
023422 
023430 
023435 
023442 
023450 
023456 
023464 
023472 
023500 
023506 
023514 
023517 
023524 
023532 
023540 
023542 
023544 
023546 
023554 
023562 
023570 
023576 
023604 
023612 
023614 
023622 
023630 
023636 
023642 
023650 
023656 
023660 
023665 
0236 72 
023700 
023 706 
02 3 714 
023722 
023730 
023 7 36 
025744 
023 752 
023760 



045 
041511 
051524 
035131 
052045 
051104 
021440 
044445 
052116 
051105 
042520 
047111 
051455 
051101 
042504 

124 
020062 
047516 
047101 
04 7440 
043040 
040524 
020104 
020040 

045 
052057 
046123 
021440 
021445 
021534 
051045 
020105 
043040 
046123 
04 7524 
042524 
021445 
044045 
051101 
020122 
042523 
051445 
052040 
021440 
052524 

124 
051445 
052040 
030050 
026066 
033467 
022445 
051122 
046123 
054524 
020041 



052123 
052040 
04 /440 
021440 
047515 
053111 

020123 
04 7522 
045040 
042522 
04 7040 
040524 
020104 
006454 
050131 
047506 
036516 
040504 
020122 
051117 
042116 
020077 
043 
042524 
033525 
053101 



046505 
046524 
047522 
053101 
041040 
052123 

051101 
020105 
047111 
021445 
040514 
050131 

033*67 
030505 
040514 
050131 
052075 
036461 
035051 
047111 
041505 
053101 
042520 
05 U20 



052101 
051505 
046116 

020063 
035105 

047503 
046114 
046525 
020104 
047117 
042116 
047515 
012 
020105 
020122 
052123 
042122 
051103 
051440 
051101 
020040 

033061 
020067 
035105 



053117 
050104 
020115 
020105 
020105 
042105 

053504 
053523 
052440 

042526 
035105 

043 
021466 
042526 
020105 
030505 
052524 
021440 
047505 
020124 
020105 
02044 1 

04 551/ 



MSG56: .ASCII /^STATIC TESTS ONLY; 0/ 



MSG5 7: 
MS57A; 



MSG58 



MSG59 
MSG60 
MSG62 



.ASCII /*TM03 DRIVE.: */ 



.ASCII /*IS CONTROLLER JUMPERED IN NON -STANDARD MODE , /< 15>< 12 > 



.ASCII /TYPE 2 FOR NON-STANDARD OP CR FOR STANDARD ? 



#/ 



ASCII '*TE16/ru77 Sl-AVE : <>*$♦. B 



ASCII /**/ 
ASCII /\4>/ 
ASCII /^REMOVE TMDP FROM SLAVE TO BE TESTED**?/ 



MSG63: .ASCII /^HARDWARE SWR IN USE**/ 



MSG64- .ASCII /*SL.AVE TiPE: 0/ i»»B 



MSG65: .ASCII /TU//0/ , , »n 
MSG66; .ASCII /!( U.ft ■■ ; ♦ >Fi 
MSG67: .ASCII /*Sl AVE TtPE { 0* Tf 16 . 1 * rgi" 7 * : #' j » »6 



MSG68: .ASCII /**INCORRECt Si Avt TiPEM! PROGRAM ABORTED*'- }*♦& 



CYHAt.O 1M03 Tt lb W?? CTl. 1 
C/TEAfc',Pll 06 -APR -84 09;45 



MACU1 50(1046) 06 APR -84 09:48 



PAGE 



66-6 



4031 

4032 
403? 

4034 



4035 



4036 



4037 



4038 



4039 



4040 



0*23 /66 

023 7 74 
024002 
024010 



024012 
024020 
024026 
024034 
024042 
024050 
024056 
024064 
024066 
024074 
024102 
024110 
024 116 
024124 
024132 
024140 
024145 
024152 
024160 
024166 
024174 
024202 
024210 
024216 
024224 
024232 
024240 
024246 
024254 
024262 
024270 
024276 
024304 
024312 
024314 
024322 
024330 
024 336 
024 344 
024 352 
024 360 
024363 
024370 
024 376 
024404 
0244 12 
024420 
024426 
0244 32 
024440 



040522 
051117 

046111 
021514 



022445 
020103 
030440 
053111 
051104 
043516 
030071 
021451 
022445 
020103 
031040 
044507 
040440 
051523 
046450 
051040 

045 
041511 
020124 
047117 
041O40 
051505 
020110 
026465 
0344 70 
022445 
020103 
032040 
053101 
051104 
043516 
030071 
046440 
021451 
022445 
020103 
032440 
041040 
051505 
0344/0 
024502 

045 
041511 
020124 
020103 
042524 
034115 
041131 
022445 
020103 



020115 
042.524 
042514 



04 7514 
042524 
020072 
020105 
051505 
024040 
020071 

047514 
042524 
020072 
052123 
042104 
047111 
034470 
024510 
046045 
052040 
035063 
051124 
051525 
020124 
034115 
041131 
034460 
047514 
042524 
020072 
020105 
051505 
024040 
026465 
034470 

047514 
042524 
020072 
052111 
020124 
032460 
043 
046045 
052040 
035066 
044502 
052123 
030071 
021451 
047514 
042524 



SEQ 0109 



041101 
021504 
040507 



04450/ 
052123 
051104 
042101 
044523 
034115 
044122 

044507 
052123 
042522 
051105 
042522 
020107 
034460 
043 
04351? 
051505 
041440 
046117 
052040 
051050 
030071 
046440 
021451 
044507 
052123 
046123 
042101 
044523 
034115 
041131 
031463 

044507 
052123 
051115 
052040 
046450 
054455 

043517 
051505 
052040 

020124 
024040 
026465 

04450/ 
052125 



MSG69: .ASCII /ILLEGAL^/ } » >B 

{TEST HEADER********** 
MSLT1: .ASCII /**LOGIC TEST 1; DRIVE ADDRESSING CM8909 RH)#/ 



MSLT2s .ASCII /**LOGIC TEST 2: REGISTER ADDRESSING CM8909 RHHV 



MSLT3: .ASCII /**LOGIC TEST 3: CONTROL BUS TEST ( RH M8905-rB M89O9)0/ 



HSLT4; .ASCII /**10GIC TEST 4j SLAVE ADDRESSING (M8905-tB M8933)*' 



MSI.T5: .ASCII /#*L0G1C TEST 5: MR BIT TEST (M890S *B)tf. 



MSLT6: .ASCII /»*LOGIC TEST 6: TC BIT TEST CM8905 iB)ft 



MSIW. .ASCII /tftfLUGIC TEST /; F'C HIT TEST < M8905 iBJfl 



C/TtAl.O I MO 5 
CZTtAE.Pil 



Ttib/ru?; ctl i 

06-APR-84 09;45 



4041 



404^ 



4043 



4044 



4045 



4046 



024446 
024454 
02446,? 
024470 
0244 76 
024501 
024506 
024514 
024522 
024530 
024536 
024544 
024552 
024557 
024564 
024572 
024600 
024606 
024614 
024622 
024624 
024632 
024640 
024646 
024654 
024662 
024670 
024675 
024 702 
024710 
024 716 
024 724 
024732 
024 740 
024 742 
024 750 
024 756 
024 764 
024772 
025000 
025006 
025014 
025022 
025030 
025036 
025044 
025051 
025056 
025064 
025072 
025100 
025106 
025114 
025122 
025130 



033440 
041040 
051505 
034470 
024502 

045 
041511 
020124 
052506 
047117 
052040 
046450 
054455 

045 
041511 
020124 
047507 
052040 
046450 
021451 
022445 
020103 
030440 
044522 
040505 
052111 
030071 

045 
041511 
020124 
047111 
050125 
052123 
021451 
022445 
020103 
030440 
040524 
052101 
04 7454 
042516 
042524 
042524 
024040 
044522 
047111 

045 
041511 
020124 
052123 
040440 
026124 
044514 
044522 
04 7522 
042105 



020072 
052111 
020124 
032460 
043 
046045 
052040 
030061 
041516 
041040 
051505 
0344 70 
024502 
046045 
052040 
030461 
041040 
051505 
034470 

047514 
042524 
035062 
042526 
054504 
024040 
024471 
046045 
052040 
031461 
042524 
020124 
024040 

047514 
042524 
035064 
052524 
041040 
026516 
053454 
050040 
052103 
047516 
042524 
024507 
046045 
052040 
032461 
052101 
020124 
043117 
042516 
042524 
042524 
04 3 



MACYll 30(1046) Ob-APR-84 



041506 
052040 
046450 
054455 



09; 48 PAGE 86-7 



SEQ OIK' 



043517 
051505 
020072 
044524 
052111 
020124 
032460 
04 3 
043517 
051505 
020072 
052111 
020124 
034460 

044507 
052123 
042040 
051040 
041040 
034115 
043 
043517 
051505 
020072 
051122 
042524 
044122 

04450 7 
052123 
051440 
020123 
052117 
044514 
044522 
047522 
042105 
053440 
051040 
04 3 
043517 
051505 
0200 72 
051525 
04/502 
026506 
053454 
05004 
052103 



MSLTlOj .ASCII /KtfLOGIC TEST 10s FUNCTION BIT TF.ST (M8905- tB ),'>/ 



MSLTll: .ASCII /**LOGIC TEST 11; GO BIT TEST (M89O9)0/ 



MSLT12: .ASCII /**LOGIC TEST 12; DRIVE READY BIT (M8909KV 



MSLT13: .ASCII /**LOGIC TEST 13; INTERRUPT TEST (RH)». 



MSLT14; .ASCH /«WLOGIC TEST 14; STA^ AT ROT.ON LINE, WRITE PROTECTED (NO WRITE RINuU' 



MSLT15: .ASCII . **U)G1C TEST 15; ^TATUF AT BOT.QEF LINE, WRITE PROTECTED.'? 



CM I A| TN05 

c* ti m .pi i 



U lb II' 
Ob -APR 



'.'CM I 
tf4 09:45 



MACYll 50(1046) 06 APR -84 09:48 PAGfc 86 8 



SfcQ 0111 



404/ 025141 
025146 
025154 
025162 
025170 
0251/6 
025204 
025212 
025220 
025226 

404a 025230 
025236 
025244 
025252 
025260 
025266 
025274 
025302 
025310 

4049 025311 
025316 
025324 
025332 
025340 
025346 
025354 
025362 

4050 025370 
025376 
025404 
025412 
025420 

4051 025424 
02543? 
025440 
025446 
025454 

4052 025461 
025466 
0254/4 
02550? 
025510 
025516 
025524 

4055 025526 
025534 
025542 
025550 
025556 
025564 

4054 025566 
0255 74 
025602 
025610 
025616 

4055 025622 



045 
041511 
020124 
052123 
040440 
026124 
047111 
052111 
052117 
021504 
022445 
020103 
030440 
040524 
052101 
044514 
044522 
040516 

043 

045 
041511 
020124 
046111 
020114 
044524 
051505 
034470 
022445 
020103 
031040 
051115 
034460 
022445 
020103 
031040 
040520 
030071 

045 
041511 
0201^4 
046506 
030CU 
046440 
021451 
022445 
020103 
031040 
040520 
030071 
021451 
0P2445 
020105 
031040 
04 3105 
054460 
022445 



04351 T 
051505 
0200 72 
051525 
04 7505 
046055 
051127 
051120 
042524 

044507 

052123 
051440 
020123 
026516 
053454 
042440 
042105 

04351/ 
051505 
020072 
040507 
041516 
052040 
046450 
021451 
04450/ 
052123 
051040 
0344 70 

044507 
052123 
041440 
034115 
04 3 
04351/ 
051505 
020072 
034115 
041131 
033060 

044507 
052123 
042040 
034115 
044122 

04450/ 

052123 
04/040 
0544 70 



MSLT16: .ASCII /**LUG1C TfcST 16; STATUS AT HOT .ON-LINE # WRT TF. PROTF.CTE.Utt/ 



MSLT17: .ASCII /rfKLOGIC TfcST \?i STATUS AT ON-LINE ,WR I TF. fcNABl. fcD4/ 



MSLT20; .ASCII /«MLOC»IC TfcST ?0; a LEGAL FUNCTION TfcST < M8909 HV 



046045 
052040 
033061 
052101 
020124 
047117 
026105 
020105 
041505 

04/514 
042524 
035067 
052524 
04 7440 
042516 
042524 
046102 

046045 
052040 
030062 
042514 
052506 
04 7 1 1 7 
020124 
034460 
047514 
042524 
035061 
046450 
021451 
047514 
042524 
035062 
024122 
024471 
046045 
052040 
031462 
024124 
026465 
0344^0 

0*. ■ -M 
0*2.. 24 

o::: 0C4 

02412? 

020066 

047514 
042524 

035065 
04M50 
021451 
047514 044507 MSLTjo: .ASCII /w*LQuIC TLSI 26: fcCLvM8^0H)tf / 



MSLT21; .ASCII /KtfLOGIC TfcST ?ls RMR(M8909)tf/ 



MSLT22? .ASCII /**LOGIC TfcST 22: CPAR(Mtt^09)« 



MSLT23: .ASCII /**10GIC TFST 23: FNHM8905-TB M890b>tf 



MSLT24: .ASCII /**106IC TFST 24; DPAR(Mt}906 RH)« 



MSLT25: .ASCII /**10GIC TfcST ^5: NfcF (M8SH>»)0. 



CVTMt.O 


!M05 Tt.it> U'.V 


CU 1 


MACUl 


5011046) 


CZU At . 


PJ1 06 -APR 84 


09:45 








025630 


020103 


0425 ?4 


052123 






025636 


031040 


035066 


04 3040 






025644 


042503 


0464!>0 


0344 70 






025652 


034460 


021401 






4056 


025656 


022445 


04 75 14 


04450 7 


M5LT27: 




025664 


020103 


0'2524 


052123 






025672 


031040 


035067 


044440 






025 ,"00 


051114 


046<*jo 


0344 70 






025^06 


034460 


021451 






4057 


025712 


022445 


04 7514 


044507 


MSLT30: 




025720 


020103 


042524 


052123 






025726 


031440 


035060 


052104 






025734 


024105 


034115 


030071 






025 742 


020066 


044122 


021451 




4058 


025750 


022445 


047514 


044507 


MSLT31: 




025 756 


020103 


042524 


052123 






025764 


031440 


035061 


047440 






025772 


044520 


046450 


034470 






026000 


031463 


021451 






4059 


026004 


022445 


047514 


044507 


MSLT32: 




026012 


020103 


042524 


052123 






026020 


031440 


035062 


052440 






026026 


051516 


046450 


034470 






026034 


034460 


021451 






4060 


026040 


022445 


047514 


044507 


MSLT33: 




026046 


020103 


042524 


052123 






026054 


031440 


035063 


050040 






026062 


050111 


046450 


034470 






0260 70 


034460 


021451 






4061 


026074 


022445 


047514 


04450/ 


M5LT34: 




026102 


020103 


042524 


052123 






026110 


031440 


035064 


050040 






026116 


051505 


046450 


034470 






026124 


030463 


021451 






4062 


026130 


022445 


047514 


04450/ 


MSLT35: 




026136 


020103 


042524 


052123 






026144 


031440 


035065 


051440 






026152 


041501 


046450 


0344 70 






026160 


031463 


046440 


0344 70 






026 U>6 


032460 


054455 


024502 






026174 


04 3 








4C63 


026175 


045 


046045 


043517 


MSLT36: 




026202 


041511 


052040 


051505 






026210 


020124 


033063 


0200 72 






026216 


041506 


024123 


034115 






026224 


031471 


020063 


034115 






026232 


030071 


026465 
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021451 
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022445 


047514 
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ASCII /**L0GIC TEST 30 sDTF.C M8906 RH)G/ 



ASCII /HKLOGIC TEST 31 J 0Pl(M8933)tt/ 
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026324 


032040 
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040524 
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046440 


051101 


024113 




026346 


034115 
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024462 
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026355 
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046045 


04351/ 




026362 


041511 


052040 


051505 




026370 


020124 


030464 
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051116 


020132 


040524 




026404 


042520 


046440 
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026412 


020113 
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0344 70 




026420 


032063 


021451 
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026424 


022445 


047514 


044507 
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042524 
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032040 


035062 
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026446 


041522 


046450 


034470 
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021451 
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052123 
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021451 
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020101 
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1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 ) 

1) 

.64 

.66 
.6".' 
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PAGE 88-5 



SEQ 0121 



03or?4> 

030774 
030776 
031000 
031002 
031004 
031006 
031010 
031012 
031014 
031016 
031020 
031022 
031024 
031026 
031030 
031032 
031034 
031036 
031040 
031042 
031044 
031046 
031050 
031052 
031054 
031056 
031060 
031062 
031064 
031066 
031070 
031072 
031074 
031076 
031100 
031102 
031104 
031106 
031110 
031112 
031114 
031116 
031120 

031532 



000000 
000000 
000000 

oooooo 
oooooo 

oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 

000 
OOo 100 

oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 

031532 

oooooo 

C00001 



POST 



UBUFT 

rbuf y 



































o 

o 














6 



♦ 410 



,t.ND 



K.LO 



CJUAlO TM05 

C/TEAE.P11 



06-APR-84 09:45 
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SEQ 0127 



I.T4A 

LT4B 

LT4C 

I.T4D 

LT4FRG 

I.T4EH1 

LT4ER2 

L.T4G 

LT4G0 

I.T4X 

LT40 

LT40IT 

LT40X 

I.T40XX 

LT41 

LT41IT 

LT41X 

I.T42 

I T42A 

LT42B 

LT42B1 

L.T42B2 

L142C 

LT42D 

LT42E 

L.T42IT 

L T42X 

LT43 

I.T43C 

LT430 

I- f43fc 

L143E 

I T43JT 

*.T43X 

LT43XX 

I.T44 

I T44A 

LT44A1 
I.T44B 
LT44C 
I.T44D 

I.T44L 

I.T44T 

LI 44 IT 

LT44X 

LT44XX 

I T45 

I.T45A 

I T45B 

I.T45D 

L T45E 

I I45t 1 

LU5t 

I.T45IT 

I 145/ 

LT4bXX 



003 716 

003760 
003 766 
004120 
004146 
004130 
004140 
003646 
003636 
004176 
01215? 
012166 
012262 
012266 
012272 
013306 
012502 
012534 
012636 
01265? 
012700 
012720 
012764 
013000 
013030 
012572 
013050 
013064 
013174 
013210 
013242 
013274 
013122 
013314 
013324 
013330 
013414 
0i34?6 
013436 
013452 
013500 
013502 
013542 
013356 
015562 
013572 
013576 
013704 
013720 
013 750 
013662 
013674 
014002 
013624 
014026 
014036 



18 75 

1894 

1900* 

1896 

1929 

1897 

1899 

18784 

18760 

1873 

1540 

1541 

2877 

28840 

1542 

1543 

2914 

1544 

29500 

2951 

2955 

2959 

29710 

2972 

2976 

1545 

2980 

1546 

30080 

3009 

3013 

3022 

1547 

3017 

2993 

1548 

30460 

304 7 

30520 

3053 

305'/ 

30620 

3063 

1549 

3069 

30770 

1550 

30980 

3099 

3103 

30920 

3093 

3111 

1551 

3118 

31220 



18890 
18980 

1924 
19310 
19280 
19300 
1925 

1886 
28660 
2866 
28830 

28890 

2889 

2918 

29360 

2953 

29540 

29600 

2964 

2974 

29750 

29810 

2942 

2984 

29920 

3011 

30120 

30180 

30250 

2996 

3028 

30320 

30360 

o04^ 

30500 

3055 

30560 

30610 

30 700 

3039 
3073 

30820 

3101 

31020 

31070 

3095 

3096,'.' 

31140 

3085 

31200 



1927 



1935 



1933 



1923 
28680 



28910 
29200 



19360 



29450 
29860 



29980 
30300 



3040.V 
30750 



30860 



10 



CZH.ArO 1M03 
C/ThAK.Pll 



ti u>< ru/7 en i 

06-APR-84 09:45 



LT4t> 

LT46A 

LT46B 

L.T46C 

LT46D 

I T46IT 

I.T46X 

LT46XX 

L.T47 

1.14 7A 

I.T4 7B 

LT4/C 

L.T47IT 

LT4 7X 

LT5 

LT5A 

LT5R 

LT5C 

1.T5D 

I T5t 

LT5ER1 

LT5ER2 

L.T5IT 

I.T5X 

L.T50 

LTSOIT 

LT50X 

L.T51 

LT51IT 

LT51X 

L.T6 

LT6A 

LT6A1 

I.T6B 

LT6D 

I..T6ER1 

i.ibir 

1 T6X 

I T7 
I.T7A 
I T7B 
I T/C 
I T7ER1 
L.T7IT 
1.1 7X 
MMSGO 
MM'JGl 
MMSG2 

mmsgs 

MM5G4 

MMSG5 

MR 



MSbl 



014040 
014104 

014160 
01417b 
014050 
014070 
014070 
014300 
014304 
014374 
014406 
014410 
014 300 
014464 
004000 
004000 
004040 
004052 
004060 
004 304 
004316 
004340 
004010 
004 360 
0144 74 
014510 
014634 
014650 
014664 
015010 
004370 
004410 
004406 
004414 
OC44 34 
004454 
004374 
0044 76 
004506 
004504 
004544 
004514 
004564 
004 510 
004606 
007100 
00714 7 
007045 
00 /066 
00/304 
00/4 3 7 
000534 



020762 



1550 
3136V? 

3144* 

3145 

3149 

1553 

3153 

3165* 

1554 

3179* 

3180 

3184* 

1555 

3191 

1486 

1945* 

1950* 

1951 

1956* 

1960 

1949 

1961 

1487 

1963 

1556 

1557 

3201 

1558 

1559 

3253 

1488 

1984* 

1983<? 

1985ft 

1990* 

1989 

1489 

1991 

1490 

0010* 

0015* 

0008* 

0014 

1491 

0016 

3640 

0161 

0184 

0006 

0030 

4084* 

1350* 

0406* 

064 1 

31 38 

1588 
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3107* 

3137 

314 7 

3148* 

3154* 

3130 

3161 



SEQ 0128 



3169* 

3180 

3183* 

3187 

3170 

3195* 

1941* 

1953 

1969 

1954* 

1965 

1960* 

1966* 

1970* 

1940* 

1974* 

3200* 

3203 

3203 

3034* 

3235 

3055 

1980* 

1995 

1993 

.\997 

1999 

1996* 

1961* 

0000* 

0006* 

0020 

0004 

0018 

0021* 

000 7* 

0005* 

4079* 

4080* 

4031* 

4080* 

4083* 

1945* 

0455* 

0650 

3140 

1593* 



3131* 
3163* 



3171* 
1967 



1971 
1973 



3004* 
3005* 

3036* 
3057* 



2022 



1946 
0461* 
755* 
3140* 
3961* 



1956* 
0460* 
0/98. 
3176* 



195/ 
0518* 

0850* 
3184* 



0065* 
0509* 
08/3* 
3185* 



0105* 


0089* 


0345* 


03/0* 


0383* 


38 * 


. ' ^*0 


0540* 


0543* 


05 /o* 


OtiOO* 


«V.n>» 


Of *08 


tV33 


0894* 


0**4 ;♦ 


09ti8* 


3000 + 


3018 


3O50* 


$$")<>* 


3010 + 


3243* 


307t» 


3079* 


3080* 


538o 





M10 
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C7TEAF.P11 06 -APR -64 09:45 



MACYU 30(1046) 06 -APR -84 09:48 PACK 89-7 
CROSS RtrtRtNCt TABLE •• - USER SYMBOLS 



SHQ 0129 



MSG10 
MSG11 

MSG12 
MSG13 
MSG14 
MSG15 

M:kilb 
MSG18 

MSG19 

MSG2 

MSG2A 

MSG20 

MSG21 

MSG22 

MSG23 

MSG24 

MSG25 

MSG25A 

MSG26 

MSG2? 

MSG3 

MSG30 

MSG31 

MSG32 

MSG33 

MSG34 

MSG35 

MSG36 

MSG37 

MSG4 

MSG40 

MSG4 1 

MSG42 

MSG4 3 

MSG44 

MSG45 

MSG46 

MSG4 7 

MSG5 

MSG50 

NSG51 

MSG53 

MSG54 

MSGr»r 

MSG56 

MSG5 / 

MSG58 

MSG59 

MSG6 

MSG60 

MSG62 

M5G6 3 

M5G64 

M5G65 

MStiM* 



02U04 

021730 

021755 

021764 

02177? 

022010 

022026 

022036 

022055 

021165 

021226 

022074 

022126 

022164 

022205 

022240 

022266 

022315 

022342 

022371 

021355 

022405 

022413 

0224 31 

02244 7 

0224 70 

022505 

022523 

02254 1 

021377 

022557 

022563 

022602 

02261/ 

022/2 3 

022745 

02276/ 

023073 

021415 

023125 

023144 

023173 

023205 

023216 

023313 

023340 

023517 

023542 

021435 

023544 

023546 

023614 

023642 

023660 

02 3605 



MSG57 023672 



1853 

1848 

3339 

3343 

1966 

1 970 

3350 

1996 

2021 

1756 

1754 

2049 

20/7 

2083 

2089 

2115 

2119 

2123 

2142 

2169 

1786 

1918 

3455 

3451 

3458 

39980 

39990 

4000$ 

40010 

1816 

3769 

1727 

3067 

3562 

1594 

1603 

3368 

3431 

1819 

2538 

3308 

3023 

3112 

2961 

1655 

1637 

1646 

3728 

3327 

3737 

1585 

36/5 

1900 

1903 

1906 

1665 



39760 

39770 

3504 

3508 

39800 

39810 

3514 

39830 

3192 

39640 

39650 

39850 

39860 

39870 

39880 

39890 

39900 

39910 

39920 

2192 

39670 

39940 

39950 

39960 

39970 



1822 

4002O 

40030 

4004 

40050 

40070 

40080 

40094 

40110 

39690 

40120 

40130 

4014O 

40150 

40160 

40170 

40180 

40210 

40220 

39 700 

40230 

4024 4 

40250 

40260 

402/0 

40280 

40290 



39 780 
39790 



39820 
39840 



2214 



2240 



39930 



39680 



N'1.0 



CZTt-.At-O TM03TE16-TU77 C1L I 
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SEQ 0130 



MS(ib8 

MSli69 

MSG 7 

MSG8 

MSG8A 

MSG9 

MSI. 11 

MSLT10 

MSl.Tll 

MSL112 

MSI T13 

MSLU4 

MSt T15 

MSI. lib 

MSt. 117 

MSI.T2 

MSI. T 20 

MSI.T21 

MSI 122 

MSLT23 

MSLT24 

MSI. IPS 

MSI. T 26 

MSLT2 7 

MSI 13 

MSl.130 

MSLT31 

M5L132 

MSL.T33 

M5LT34 

MSI. T 35 

MSLT36 

MSI.T37 

MSLT4 

MSI 140 

MSLT41 

M51.T42 

MSt. T 4 3 

MSLT44 

MSl.145 

MSI. 146 

MSLT47 

MSLT5 

MSLTSO 

MSLT51 

MSL16 

MSLT7 

MS57A 

MUNI 

NONSTO 

NOST 

NR/Of- 
NXTDRv 

Nxrsi V 

OCTP 

OCTPL 



023730 

02400? 
021454 
0214 72 
021533 
021662 
024012 
024 SOI 
02455 7 
024624 
024675 

024 742 
025051 
025141 
025230 
024066 
025311 
025370 
025424 
025461 
025526 
02556b 
025622 
025656 
024145 
025712 

025 750 
026004 
026040 
0260 74 
026130 
026175 
026242 
024232 
026310 
026355 
026424 
026460 
026514 
026574 
026656 
02S712 
024314 
026762 
027042 
024 563 
0244 32 
023-556 
017246 
001020 
01*. 6 70 
00065b 
002336 
002410 
020172 
020162 



1915 


4030* 






1911 


4031* 






3330 


3971* 






1878 


3972* 






1876 


3973* 






1932 


39 75* 






1745 


4 054* 






2033 


4041* 






2060 


4042* 






2101 


4043* 






2133 


4044* 






2160 


4045* 






2183 


4046* 






220? 


4047* 






2231 


4048* 






1/98 


4035* 






2256 


4049* 






2285 


4050* 






2315 


4051* 






2339 


4052* 






2364 


4053* 






2422 


40S4* 






244 7 


4055* 






2491 


4056* 






1834 


4036* 






2513 


4057* 






256 7 


4058* 






2715 


4059* 




« 


2752 


4060* 






2770 


4061* 






2793 


4062* 






2818 


4063* 






2839 


4064* 






1931 


4057* 






286 7 


4065* 






2890 


4066* 






2941 


4067* 






299 7 


4068.7 






3038 


4069* 






3084 


4070* 






3129 


4071* 






3169 


4072* 






1941 


4058* 






3202 


4073* 






3234 


4074* 






1981 


4059* 






2008 


4040* 






1627 


4019* 






1334 


1613 3654* 






1451.7 








1636 


3570* 






1402-.'? 








1 7 00 « 








1700* 


1 726 






J 59 7 


160b 1640 164 V* 


1658 


1 668 


3342 


3346 3371 3573 


33 75 


3577 



i ; 50 

33/9 



3524 
3381 



3*53 
3383 



350 7 
5385 



3511 
338? 



35 L ' 
3389 



3828* 



C/TI MO 


TM03 T! 


c:ua\ , 


P 1 1 


OC 1 PI 1 


CVOl 76 


OCT Pi; 


IV03S0 


OCT Pi JO 


0?0366 


OCT Pi; i 


o.x>3*v 


OCTPO 


0AV16 


OCTPl 


CV0^3h 


OCT P." 


0JH.V44 


JCTP5 


0^0334 


OH 


0. , 04U' 


PATHS 


ooc / :6 


PCN'R 


001014 


Pi \M 


000 * V 


P> l u 


O00f>tu % 


POST 


030 / ;*» 


PRt 


0*Ot»M 


PRt'H 


000 764 


p$w 


000566 


RBI* *' 


03153^ 


RCDP 


001004 


ROAD 


000 756 


RDATA 


030404 


RDRVF 


001 000 


RFGP 


015554 


Rt bS 


000606 


RTRN 


000664 


SAVi 


000 700 


SAVC 1 


000 w 


SA^3 


000 '04 


5C> 


ooo :?h 


SChN 


00 14 SO 


•a COUP 


000 706 



n \u ivt: en i 

06 APR 84 09:45 
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Sf-.Q 01 'a 



SCOP* 


016550 


-^ p^ t 


000 76 h 


SI' A T 


ooiou 


S, A* 


000/16 


v ;N 


000660 


S, -.Tip 


001010 


'.N 


000540 


SNPi. 


t »05 74 


,NPT 


GNOSIS 


SSC> 


ooo ,vo 


'.TAR I 


001554 


STATC 


00 1 0O6 


'.TATf 


00 1 000 


STATIC 


oi5o,'4 


SUt f, 


ooo ; 54 


• rsCO 


00 4 '56*, 


'.TWOIV 


00*jOi'0 


srwiii .' 


HO*. 1 V 


S '(. 


001*,*. 4 


VI 


001 '06 



394o 
























38c 1 *) 


38310 






















3840 


384 5 


3850 


3H54 


3859 


3864 


3866 


38 /l# 










38 7,> 


38 74 


38/70 




















3835 


38 780 






















3832 


3834 


38370 




















3838 


384 ?« 






















3841 


3844 






















3836 


38670 






















38^8* 


3830* 


3833 


38 7 5 


38 7 7* 


38830 














144, '0 
























14490 


1685* 


1 IW 


1741* 


3550 
















14 t ^40 


3490* 


3 50 J 


55. , 8* 


















14040 


3311* 


333c?* 


335 7 


5400* 


34 54* 


54 38 


54 /6 ♦ 


5481 


<4><5* 549, ♦ 


5518* 


35,' 3 


4 1600 
























41560 
























14370 
























13710 


•?137» 


cU4l* 


5666* 


















41660 
























1445a 
























14340 
























41460 
























14440 


168^* 


3269* 




















334 7 


336 70 


34 5 5 


34 75 


















13 790 


1596 


1598 


1615 


















14050 


2135* 


3655 




















14110 
























141^0 
























14150 
























14^0 
























158 4 >0 
























14140 


1787* 


18<?5* 


1849» 


1854* 


195 54 


i'O. '• 


r*'i* 


!■#•#•• 


.u,','* .0504 


,'OMO* 


,'0H».» 


<?09?4 


,H16* 


?1^0* 


•>W*4* 


J14<4 


»'lt.H4 


.'I'M* 


//l 54 


,\ , 5>*# 


»'»"• '4 ,V«*4 


«'5l».4 


,*<4>'4 


2365* 


«?4V* 


;»4/v* 


<M90* 


^514* 


/■•f»8» 


t -Vi«# 


.' '!».♦ 


,• '•.«• 


/ ' '14 ,' '•«*• 


,'V<4 


, M. *• 


^fli'5* 


, } 8 30* 


i'84*,* 


i?H5 7# 


;»H6*.* 


,9J89* 


."M.'t 


, ,, i'»64 


50 5'C4 


50H5 4 5150* 


M'O* 


5, 3* 


3«?55* 


344 5 4 


3 , «4, 1 




















i )C >40 


35M 


5444 


35, '9 


35 54 
















14380 
























14480 


1580* 


1 '40* 


1 748 


1H '0 
















14180 
























14050 


1648 


1650 


1 700* 


18f.M 


18*. '» 


/ 'M 


558*. 


5»,ti'* 








14470 


166 7 


1669 


16 74 


1#.*»4* 


19J5 


,'6 ,9, 












15540 


19^0 






















3918 


39.? 1 


39J7 


W9 


39 5 1 tf 
















19 4 U 


391 t >0 






















14190 
























1 5..'5 


15680 






















14460 


165 7 


16V# 


3. 65 


















14450 
























^9 3 7 


,'995 


50 5/ 


3 DM » 


51, M 


3.>.5tf 














14,'So 


U>96* 


1 71. » 


1717* 


I 750 


18 7,' 


,'15' 


.'180 


.ViV 


.V.'M 5.'* < 






169** 


t 71 /O 






















1*. 7»,4 


.','09 


.V1HC 




















16/;* 


.'.M', 


»\M40 




















1MM<? 


\*u I 






















16, '4 


16, '6 























lVU >\\ o :mo5 



ii u» !».•.'•• en 1 
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SWR 



TC 



002.Y6 

0005 70 



000 i '."h 
00132* 
000542 



HM^i 


000b V 


TKMPJ 


0006 7 J 


U.MP? 


0006 M 


TE.M3 


00.?t*u\' 


TKNOX 


00 J ."JO 


ThX 


020160 


TIB 


00061 J 


TIMf.R 


01064.? 


TIMf RO 


010666 


TIM6.P1 


010616 


T I MOK 


010734 


T1M0N 


010550 


T IMOV> 


010 '00 


TINLR 


01 76 .'6 


TKB 


0005 .'4 


TKS 


0005 ,V 


t;.ast 


001550 


TMSl 


02 /M 3 


TMS10 


02 7601 


TMSU 


02 /60/ 


IMS 12 


02/615 


T MSi? 


02 762? 


T1^14 


02/6 51 


TMS1S 


02 76 3"/ 


TM';i*, 


02 '645 


t msi; 


02/655 


TM<il» 


02 7661 


TMS19 


02 /6t> / 


t m.;2 


02 7521 


T M'i20 


02 76 75 


TMScU 


02 7 704 


TMS.V 


C2 7/12 


tM;,j:5 


02 '721 


TM524 


02 7 727 


TM^25 


02/7 55 


t m i ,26 


02 7 74 5 


TMS27 


02 '751 


TMS28 


02 7 75 -' 


TM529 


02/765 


TM5S 


02 752 7 


TMS?0 


02/7 /2 


TM',51 


50000 


TM'i.V 


3t\>C6 


IM',35 


050014 



1329 

1 5 .Vff 
21 /M 
34/8 
3949 

152U 

15600 

13550 

2526* 

2842* 

3586* 

14070 

14080 

14090 

390? 

1560 

1736 

3 790 

1384 

2584 

26520 

264 1 

2590 

2580 

2649 

3 74 3 

13740 

13750 

15610 

40910 

2499 

41010 

41020 

41030 

2760 

41050 

41060 

226/ 

41080 

2296 

40920 

2325 

2350 

2401 

5104 

41140 

3150 

5014 

41170 

24 7 5 

41190 

2880 

2906 

24 5 5 

2512 
412 5/; 



MAC til 



16/5 
15/5 
2200 
3483 

15 7 7 
35 72 

WOO* 
2552 
284 5 
3609* 

1763 

3301 ♦ 

1/46* 

3906 

1719 

1758 

38230 

3717 

260 7 

2644 

2613 

2603 

26560 

5746 

3660 

1689* 

1718 

4)000 



41040 



410 7 
41090 

41100 

41110 
41120 
41150 

4U50 

41160 

2911 

2901 
41200 
412U 
41220 



16810 
i f »/7* 

2226 

349 5 

1581 

1M9U 
25/5* 
2849* 
3624* 
1885 

1758 

1 7250 

1 7400 

5/21 
2642 



26690 
26230 

3/5/ 

3/80 

37/7* 

3574* 
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SKi 0152 



4 i [ 8 ti 
40950 



1581* 

328m 

3512 

3o/l 

I9ft5* 
2599* 
2853 



17 74 
1917 



5 726 
26450 



3 760 
3809 
3 7 78 
35 75 



169 7 

329 / 
3520 

5681 

1986 
2/26* 
28 72* 



2259* 2265 



17/7 



5/51 
2651 



3/ 690 

380 / 



I /Oft 

3312 
3525 

3940 

206/* 
2773* 
2892* 

22 76 ♦ 

186H* 



5/4 1 
2*53 



1/14 
3348 
3535 



2107* 

2 7 74* 

51 74* 

3714* 

1880 



3 744 



W</ 

3554 
3546 



2288* 
2797* 
3179 

3725 

189 3 



1 /52 
5 559 

36 71 



234 5* 

2800 

320*.* 

5/4 /♦ 
5451* 



3/51* 3752 



1/72 

542!. 
56 7 5* 



2 568* 
2806* 
3206* 



5455* 



18/4 
54 55 
5681* 



2424* 
280 • 
32 5 7 ♦ 



3458* 



5 '80* 3/81* 



1922 

5440 
5940 



24 52* 

2V1 
3238* 



34 7 3 



5/82 



546/ 
5945 



2516» 

2«2ft 

3388 



3644 



CJTt.At 1M03 
C/UAk .Pi I 



TMS53A 


0300*V 


TMS3 3R 


03003b 


TMS33C 


030051 


IMS 5 3D 


0300/3 


7MS53e 


050 11* 


TMSJ4 


03013b 


TMS5S 


050144 


TMS5* 


030155 


TMS3 " 


030 lb 1 


TMS38 


03016: 


TMS59 


0301/5 


TMS4 


007534 


TMS5 


00/54,: 


TMSb 


oo *55i 


"MS ' 


oo/5 r . * 


TM : -,a 


00 7S65 


TMS^J 


00 '5 73 


TOM 


000610 


too. 


000060 


TPB 


000600 


TPii 


0005/6 


TRF.F 


000730 


TROO 


000600 


TROl 


000604 


TROO 


000606 


TR03 


000630 


TR04 


000630 


TR05 


000634 


TROb 


000*36 


TR07 


000640 


TRIO 


000640 


TR11 


000644 


TRIO 


00064b 


TR15 


000650 


TR14 


000650 


TR15 


000654 


TSCD 


000046 


TSCDA 


000466 


T^CDO 


0004 74 


"SCDl 


000500 


T :">CDO 


000530 


TSC03 


000546 


TSTTBL 


001056 


7 TIN 


017716 


TTINT 


01 '05* 


T TOUT 


01/760 



TTR 
104f 



01 :4 V, 

000/40 



it lb u»/; cu i 

Ob APR 84 09; 45 

05b 1 * 
0594 

0684 
0695 
0660 
0733 
3058 
09 7/ 

790 

oai^ 

0840 

40940 

4095* 

769 

4097* 

40980 

40990 

13830 

3893 

3783 

13760 

13 750 
14030 
13880 
13890 
13900 
13910 
13900 
13930 
1394 
13950 
13960 
15970 
13980 
13990 
14000 
14010 
1581 
1700 
17000 
17030 
17080 
0195 
74;^ 
3165 
1/09 

14 760 
3716 
1315 
1586 
1912 
0696 
34 30 
3/38 
1*00 
140/0 
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U5bR SYMBOLS 



41040 
41050 
41060 
410/0 

41080 
41090 

41300 
41310 
41500 
41330 
41540 



40960 



1600 

3898* 

3793 

360<'* 
3800 

1801 



1590 

1/010 

1/13 

1 704 

1790 

0017 

0764 

3196 

1/100 

1/01 

3/770 

36600 

1589 

1916 

0960 
34 /.• 

5 7/0 

161 1 

0400* 



3780* 

3951* 

3796 

3895* 

3891 



16890 



1809 
0043 

0/8 7 
300/ 

1700 



1595 
1919 
3094 

54/4 
5/8H0 
1*55 
0404* 



3/88* 
595 5* 
3/99 
3897* 



1716 



1863 
?.?8Q 
0813 
3059 



1604 
05 5/ 
3096 
',498 
1/94 
lb4 r » 
5*55 



5789 
3803 



W40 



1936 
0510 
08 34 
V6H 



55/0* 55/5* 



1608 
,'559 
531/ 
5501 
3804 
1654 



3/91 
38070 



19/5 
0554 
08*1 
5565 



1638 
065 / 
3500 
350S 
5944 
16b 3 



3/95* 
3814 



0001 
56O 
0884 



164/ 
065<i 
5551 
V,0'* 
3«»48 
lb/ 5 



3/98* 
5819 



000/ 

04 1 / 

0907 



1*5* 
Obbl 
5 5 58 
.V.15 

1 /60 



3800 ♦ 
3801 



0054 

0440 
0963 



1*** 
0b8 i 
5 340 
3^*5 

1884 



3800 

3868 



00**5 
0483 
0988 



1 :o.8 

0*83 
3 544 

3t.4 1 

5648 



"58b/* 38/9* 
3880 3934 



oio: 

050 / 
3050 



l :s : 

Ob85 
3 551 
3*4 5 



01 4b 
0561 
30/7 



L8» 
Oo'»0 
<5rW 
5», V 



SFQ 0153 



3890* 



Obi: 

5100 



l l *01 
0***4 
34 V 
5 7 >*i 



5/iOtf 5953 



I - 1 :i 



CZTEAEO 


TM03-TI 


CZTEAfc. 


Pit ' 


I'DtS 


ooo :.\? 


VfcCT 


000604 


UAM 


000744 


WBUfP* 


0511 JO 


wc 


000512 


WCDPO 


001044 


WCDPJ 


00103 2 


ucsi 


001022 


WCS2 


001024 


WDATA 


030204 


WDS 


00102t> 


UER 


001030 


WMSG2 7 


030604 


UMSG31 


050617 


WPGF L 


0007 74 


WTAD 


000752 


U2FLG 


000760 


SCNTRL 


001332 


JDONE 


002630 


JENDAD 


002666 


SMNEW 


027503 


SHSUR 


0274 73 


JSVPC = 


000 764 


. 5 


031534 


.RESTO 


020740 


.SAVE 


020^16 



TE16 tu;; CTL I 

06-APR-84 09:45 

1440ft 

3633* 

13 78* 

I4?9ft 

4164ft 

1343ft 

3372 

146 7ft 

1462ft 

1455ft 

1456ft 

2369 

1457ft 

1458ft 

3337 

3295 

1441ft 

1432ft 

1435ft 

1562ft 

1700 

1311 

394 7 

394 3 

1311ft 

1310ft 

3677 

3674 
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2936* 
1605 



2946 



4152ft 
4153ft 
1695* 



3686* 

1727ft 
1734ft 
4090ft 
4089ft 

1311ft 
3954 

3942 



2994* 

160 7 



3036* 
1612 



3082* 3127-v 



2261* 2371* 2453* 2944* 2965* 



3595 



5003* 



3596* 3600 3601* 3606 3610 



3041* 308 7* 3132* 3172* 320 7* 



SEQ 0134 
3624 

3239* 



2967 

1711* 
3690* 



3005 3043 3089 



3134 



3175 3209 324 1 4 139ft 



3809* 3810* 3811 



3813* 3815 



3817* 



3818 



1314ft 
395 /ft 
3956ft 



1320i 



1324ft 1328ft lo33ft 1539ft 2644ft 2651ft 4165ft 



1 :i. 
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C7TEAE.P11 06-APR-34 09:45 CROSS REFERENCE TABLE - MACRO NAMES SEQ 0135 



$CATCH 


1228* 


1510 


SCHAIN 


12280 


1581 


$CHNMO 


12230 


1700 


$RESTO 


12280 


595 7 


$SAVE 


12280 


5956 


, SACT1 


12280 


1511 


.$EOP 


12280 


1734 



. ABS. 051534 000 



ERRORS DETECTED: 



CZ TEAE.CZ TEAE/CRK=CZTEAE.SML/ML,CZTEAE,P11 

RUN -TIME: 4 8 1 SECONDS 
RUN -TIME RATIO: 20/14-1.4 
CORE USED: 14!< (28 PAGES) 



CZTEAE.Pll 


06 -APR. , 


-l\ 


8?!£:M 


06-APR, . 
06-APR. . 


CZTEAE.Pll 


06-APR. . 


;;ei 


CZTEA' ,P11 


06 APR. . 


. ,F1 


CZTEAl",P;ll 


06 APR.. 


, .Gl 


czrEft.Pu 


06-APR.. 


. .HI 


CZTE/tE.Pil 


06-APR.. 


..11 


CZTEAE.Pll 


06-APR.. 


..Jl 


CZTEAE.Pll 


06-APR. . 


. .Kl 


CZTEAE,Pll 


06-APR. . 


..LI 


CZTEAE.P.U 


06-APR.. 


..Ml 


CZTEAE.Pll 


06-APR,. 


. .Nl 


CZTEAE.PU 


06-APR. . 


. ,B2 


CZTEAE.PU 


06-APR.. 


. ,C2 


CZTEAE.P11 


06-APR.. 


..02 


CZTEAE.Pll 


06-APR,. 


,.E2 


CZTEAE,P11 


06-APR. . 


..F2 


CZTEAE.Pll 


06-APR.. 


..G2 


CZTEAE.Pll 


06-APR., 


..H2 


CZTEAE.Pll 


06-APR.. 


..12 


CZTEAE.Pll 


06-APR. . 


..J2 


CZTEAE.Pll 


06-APR.. 


. .K2 


CZTEAE.Pll 


06-APR. . 


,.L2 


CZTEAE.Pll 


06-APR. . 


..M2 


CZTEAE.Pll 


06-APR.. 


..N2 


CZTEAE.Pll 


06 APR.. 


. .B3 


CZTEAE.Pll 


06-APR. . 


. ,C3 


CZTEAE.Pll 


06-APR. . 


..03 


CZTEAE.Pll 


06-APR.. 


,.E3 


CZTEAE.Pll 


06-APR. . 


,.F3 


CZTEAE.Pll 


L*> HHR , . 


. .G3 


CZTEAE.Pll 


06-Af J H. . 


. H3 


CZTEAE.Pll 


06-APR, . 


. .13 


CZTEAE.Pll 


06-APR,, 


. ,J3 


CZTEAE.Pll 


06-APR, . 


..K3 


CZTEAE.Pll 


06-APR., 


.,L3 


CZTEAE.Pll 


06-APR. . 


. .M3 


CZTEAE.Pll 


06-APR,. 


,.N3 


CZTEAE.Pll 


06-APR.. 


. ,84 


CZTEAE.Pll 


06-APR.. 


. .C4 


CZTEAE.Pll 


06-APR.. 


..04 


CZTEAE.Pll 


06 APR., 


. ,E4 


CZTEAE.Pll 


06-APR.. 


, .F4 


CZTEAE.Pll 


06 APR., 


. .G4 


CZTEAE.Pll 


06-APR.. 


. ,H4 


CZTEAE.Pll 


06-APR. . 


. .14 


CZTEAE.Pll 


C6-APR.. 


. .J4 


CZTEAE.Pll 


06-APR. . 


. .K4 


CZTEAE.Pll 


06-APR. . 


. .L4 


CcTEAE.Pll 


06-APR.. 


. .*4 


CZTEAE.Pll 


06-APR„ 


♦ *N* 



CZTEAE.Pll 


06-APR,,. 


,B5 


CZTEAE.Pll 


06-APR. .. 


,C5 


CZTEAE.Pll 


06-APR. . , 


.05 


CZTEAE.Pll 


06-APR,., 


,E5 


CZTEAE.Pll 


06-APR,., 


.F5 


CZTEAE.Pll 


06-APR.., 


>G5 


CZTEAE.Pll 


06-APR.., 


,H5 


CZTEAE.Pll 


06-APR,., 


.15 


CZTEAE.Pll 


06-APR.,, 


.J5 


CZTEAE.Pll 


06-APR.., 


,K5 


CZTEAE.Pll 


06-APR.. 


,L5 


CZTEAE.Pll 


06-APR... 


.M5 


CZTEAE.Pll 


06-APR.., 


,N5 


CZTEAE.Pll 


06-APR,., 


.66 


CZTEAE.Pll 


06-APR... 


.C6 


CZTEAE.Pll 


06-APR.. 


.06 


CZTEAE.Pll 


06-APR.. 


,E6 


CZTEAE.Pll 


06-APR.. 


,F6 


CZTEAE.Pll 


06-APR.. 


,G6 


CZTEAE.Pll 


06-APR.., 


,H6 


CZTEAE.Pll 


06-APR.. 


.16 


CZTEAE.Pll 


06-APR... 


.J6 


CZTEAE.Pll 


06-APR.. 


,K6 


CZTEAE.Pll 


06-APR.. 


.16 


CZTEAE.Pll 


06-APR.. 


, M6 


CZTEAE.Pll 


06-APR,. 


,N6 


CZTEAE.Pll 


06-APR.. 


.B7 


CZTEAE.Pll 


06-APR.. 


.C7 


CZTEAE.Pll 


06-APR.. 


.07 


CZTEAE.Pll 


06-APR,. 


,E7 


CZTEAE.Pll 


06-APR.. 


,F7 


CZTEAE.Pll 


06-AP*.. 


,G7 


CZTEAE.Pll 


06-APR,, 


,H7 


CZFEAE.P11 


06-APR, , 


.17 


CZTEAE.Pll 


06-APR. . 


.J7 


CZTEAE.Pll 


06-APR. . 


.K7 


CZTEAE.Pll 


06 APR. . 


,L7 


CZTEAE.Pll 


06-APR., 


.M7 


CZTEAE.Pll 


06-A?R.. 


,N7 


C2TEAE.P11 


06-APR,. 


.86 


CZTEAE.Pll 


06 APR.. 


.ce 


CZTEAE.Pll 


06-APR.. 


.06 


CZTEAE.Pll 


06-APR, . 


E8 


CZTEAE.Pll 


06 APR. . 


.F6 


CZTEAE.Pll 


06-APR. . 


G8 


CZTEAE.Pll 


06-APR. . 


.M6 


CZTEAE.Pll 


06-APR.. 


.18 


CZTEAE.Pll 


06-APR. . 


. J6 


CZTEAE.Pll 


06-APR, . 


K8 


CZTE!\E.P11 


06-APR.. 


.L6 


CZTEAE.Pll 


06 APR. . 


.H6 


CZTEAE*PU 


06-APR, t 


>M& 



CZTEAE.Pll 


06-APR. 


...B9 


CZTEAE.Pll 


06-APR. 


...C9 


CZTEAE,P11 


06-APR. 


...09 


CZTEAE.Pll 


06-APR. 


...E9 


CZTEAE.Pll 


06-APR. 


. ..F9 


CZTEAE.Pll 


06-APR. 


. ..G9 


CZTEAE.Pll 


06-APR, 


. ,.H9 


CZTEAE.Pll 


06-APR. 


.,.19 


CZTEAE.Pll 


06-APR. 


. ,.J9 


CZTEAE.Pll 


06-APR, 


. ,.K9 


CZTEAE.Pll 


06-APR. 


. ..L9 


CZTEAE.Pll 


06-APR. 


...M9 


CZTEAE.Pll 


06-APR. 


. ..N9 


CZTEAE.Pll 


06-APR. 


...BIO 


CZTEAE.Pll 


06-APR. 


...CIO 


CZTEAE.Pll 


06-APR. 


. ..010 


CZTEAE.Pll 


06-APR. 


...E10 


CZTEAE.Pll 


06-APR. 


. ..F10 


CZTEAE.Pll 


06-APR. 


. ..G10 


CZTEAE.Pll 


06-APR. 


. ..H10 


CZTEAE.Pll 


06-APR, 


...110 


CZTEAE.Pll 


06-APR. 


...J10 


CZTEAE.Pll 


06-APR. 


. .K10 


CZTEAE.Pll 


06-APR. 


...L10 


CZTEAE.Pll 






CZTEAE.Pll 


06-APf . 


. . N10 


CZTEAE.Pll 


06-.. ... 


...Bll 


CZTEAE.Pll 


06-APR. 


...Cll 


CZTEAE.Pll 


06-APR. 


...DM 


CZTEAE.Pll 


06-APR. 


...Ell 


CZTCAE.P11 


06-APR, 


.•JFU 



